gray-extended 1.4 → 1.5
raw patch · 2 files changed
+3/−4 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- gray-extended.cabal +1/−1
- src/Codec/Gray.hs +2/−3
gray-extended.cabal view
@@ -1,5 +1,5 @@ name: gray-extended-version: 1.4+version: 1.5 synopsis: Gray encoding schemes description: Gray codes satisfy the property that two successive values differ in only one digit. Usually the term \"Gray code\"
src/Codec/Gray.hs view
@@ -41,15 +41,14 @@ -- | @'grayToIntegral' n@ decodes @n@ using a BRGC, and returns the -- resulting integer. For example, 25 is @11001@, which is the code -- for 17. So @grayToIntegral 25@ returns @17@.--- (see @'integralToGray'@ for grayToIntegral :: (Num a, Bits a) => a -> a grayToIntegral n = f n (n `shiftR` 1) where f k m | m /= 0 = f (k `xor` m) (m `shiftR` 1) | otherwise = k -- | @'naryGrayCodes' xs k@ generates a non-Boolean (or n-ary) Gray code--- of length @k@ using the elements of @x@ as "digits". This code is--- cyclic.+-- of length @k@ using the elements of @xs@ as \"digits\". This code+-- is cyclic. -- -- Ex: @'naryGrayCodes' \"012\" 4@ generates a ternary Gray code that -- is four digits long.