Remove Num constraint from floorLog
Created by noiioiu on April 25, 2024
3BR6NSGOYSWGFSMQZGMWCCEKGJVLICBXCKCZ454PQ3E46OUVTQ7QC Dependencies
In channels
main
Change contents
Replacement in src/Data/Nimber.hs at line 29 [5.880]
floorLog :: (Num a, Bits a, Num b) => a -> bfloorLog 0 = -1floorLog n = 1 + floorLog (n .>>. 1)floorLog :: (Bits a, Num b) => a -> bfloorLog n| n == zeroBits = -1| otherwise = 1 + floorLog (n .>>. 1)