diff options
Diffstat (limited to 'src/bool.gleam')
-rw-r--r-- | src/bool.gleam | 61 |
1 files changed, 1 insertions, 60 deletions
diff --git a/src/bool.gleam b/src/bool.gleam index b4e5287..d1d9ac4 100644 --- a/src/bool.gleam +++ b/src/bool.gleam @@ -1,5 +1,4 @@ -import expect -import order +// import order pub fn negate(bool) { case bool { @@ -8,14 +7,6 @@ pub fn negate(bool) { } } -test negate { - negate(True) - |> expect:false - - negate(False) - |> expect:true -} - // pub fn compare(a, b) { // case {a, b} { // | {True, True} -> order:Eq @@ -25,20 +16,6 @@ test negate { // } // } -// test compare { -// compare(True, True) -// |> expect:equal(_, order:Eq) - -// compare(True, False) -// |> expect:equal(_, order:Gt) - -// compare(False, False) -// |> expect:equal(_, order:Lt) - -// compare(False, True) -// |> expect:equal(_, order:Gt) -// } - pub fn max(a, b) { case a { | True -> True @@ -46,20 +23,6 @@ pub fn max(a, b) { } } -test max { - max(True, True) - |> expect:equal(_, True) - - max(True, False) - |> expect:equal(_, True) - - max(False, False) - |> expect:equal(_, False) - - max(False, True) - |> expect:equal(_, True) -} - pub fn min(a, b) { case a { | False -> False @@ -67,31 +30,9 @@ pub fn min(a, b) { } } -test min { - min(True, True) - |> expect:equal(_, True) - - min(True, False) - |> expect:equal(_, False) - - min(False, False) - |> expect:equal(_, False) - - min(False, True) - |> expect:equal(_, False) -} - pub fn to_int(bool) { case bool { | False -> 0 | True -> 1 } } - -test to_int { - to_int(True) - |> expect:equal(_, 1) - - to_int(False) - |> expect:equal(_, 0) -} |