noiioiu/nimbers - Change E6Q5N4UCYKSFJ4YYFRPLOUASOIARTLT2ZU2JJXM3TFP4FICDGAOAC

Nimbers in haskell.

Remove case from floorLog

Created by noiioiu on April 25, 2024

E6Q5N4UCYKSFJ4YYFRPLOUASOIARTLT2ZU2JJXM3TFP4FICDGAOAC

Dependencies

In channels

main

Change contents

Deletion in src/Data/Nimber.hs at line 31 [4.880]
∅:D[2.186] → [3.688:703]
B:BD[3.688] → [3.688:703]
```
floorLog 1 = 0
```

Replacement in src/Data/Nimber.hs at line 71 [4.880]

B:BD[2.866] → [2.866:964]

      sqra = sqr' (m - 1) a
   in sqra `shiftL` bit m + mult' (m - 1) sqra semiD + sqr' (m - 1) b

[2.866]

[2.964]

      a2 = sqr' (m - 1) a -- a^2
   in a2 `shiftL` bit m + mult' (m - 1) a2 semiD + sqr' (m - 1) b