diff options
Diffstat (limited to 'frontend/src/Utils.elm')
-rw-r--r-- | frontend/src/Utils.elm | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/frontend/src/Utils.elm b/frontend/src/Utils.elm new file mode 100644 index 0000000..825e4b7 --- /dev/null +++ b/frontend/src/Utils.elm | |||
@@ -0,0 +1,15 @@ | |||
1 | module Utils exposing (..) | ||
2 | |||
3 | |||
4 | between : ( Float, Float ) -> Float -> Bool | ||
5 | between ( l, u ) v = | ||
6 | v >= l && v <= u | ||
7 | |||
8 | |||
9 | range : Int -> Int -> Int -> List Int | ||
10 | range start stop step = | ||
11 | if start >= stop then | ||
12 | [] | ||
13 | |||
14 | else | ||
15 | start :: range (start + step) stop step | ||