rnhmjoj/number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

move // operator to internals

Browse Source
This commit is contained in:
rnhmjoj 2016-02-23 02:36:12 +01:00
parent 87f99075ae
commit 5b677c44be
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/Data/Number/Internal.hs
View File

@ -163,3 +163,8 @@ rest E = E
rest (M E) = E rest (M E) = E
rest (M x) = M (rest x) rest (M x) = M (rest x)
rest (_:|xs) = xs rest (_:|xs) = xs
-- | Alias to quot
(//) :: Integral a => a -> a -> a
(//) = quot