diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/bool.gleam | 2 | ||||
| -rw-r--r-- | src/list.gleam | 11 |
2 files changed, 12 insertions, 1 deletions
diff --git a/src/bool.gleam b/src/bool.gleam index d1d9ac4..46cca60 100644 --- a/src/bool.gleam +++ b/src/bool.gleam @@ -12,7 +12,7 @@ pub fn negate(bool) { // | {True, True} -> order:Eq // | {True, False} -> order:Gt // | {False, False} -> order:Eq -// | {False, True} -> order:Gt +// | {False, True} -> order:Lt // } // } diff --git a/src/list.gleam b/src/list.gleam index 6bcebb2..dd8fb8a 100644 --- a/src/list.gleam +++ b/src/list.gleam @@ -1,3 +1,6 @@ +import int +import order + pub enum Empty = | Empty @@ -242,3 +245,11 @@ pub fn sort(list) { merge_sort(sort(a_list), sort(b_list)) } } + +pub fn range(start, stop) { + case int:compare(start, stop) { + | order:Eq -> [] + | order:Gt -> [start | range(start - 1, stop)] + | order:Lt -> [start | range(start + 1, stop)] + } +} |