diff options
Diffstat (limited to 'gen/src/gleam@order.erl')
-rw-r--r-- | gen/src/gleam@order.erl | 67 |
1 files changed, 0 insertions, 67 deletions
diff --git a/gen/src/gleam@order.erl b/gen/src/gleam@order.erl deleted file mode 100644 index 6306636..0000000 --- a/gen/src/gleam@order.erl +++ /dev/null @@ -1,67 +0,0 @@ --module(gleam@order). --compile(no_auto_import). - --export([reverse/1, to_int/1, compare/2, max/2, min/2]). - -reverse(Order) -> - case Order of - lt -> - gt; - - eq -> - eq; - - gt -> - lt - end. - -to_int(Order) -> - case Order of - lt -> - -1; - - eq -> - 0; - - gt -> - 1 - end. - -compare(A, B) -> - case {A, B} of - {X, Y} when X =:= Y -> - eq; - - {lt, _} -> - lt; - - {eq, gt} -> - lt; - - {_, _} -> - gt - end. - -max(A, B) -> - case {A, B} of - {gt, _} -> - gt; - - {eq, lt} -> - eq; - - {_, _} -> - B - end. - -min(A, B) -> - case {A, B} of - {lt, _} -> - lt; - - {eq, gt} -> - eq; - - {_, _} -> - B - end. |