diff options
| author | tomsmeding <tom.smeding@gmail.com> | 2017-09-01 18:14:43 +0200 |
|---|---|---|
| committer | tomsmeding <tom.smeding@gmail.com> | 2017-09-01 18:15:25 +0200 |
| commit | 19c70b8eaa1126f1648b009d99092432a5c88059 (patch) | |
| tree | bd4171a4d6ef5e8ae2b09e1c84bf3e2346374e97 /Utils.hs | |
| parent | 3d5d85e00f2a81efb62bb17f8e5db63fe5a49a61 (diff) | |
Structs + typedefs
Diffstat (limited to 'Utils.hs')
| -rw-r--r-- | Utils.hs | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -11,3 +11,6 @@ uniq l = l contains :: Eq a => [a] -> a -> Bool contains l v = isJust $ find (== v) l + +roundUp :: Integral a => a -> a -> a +roundUp n sz = (n + sz - 1) `div` sz * sz |