aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/math/number/nat.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/library/lux/math/number/nat.lux10
1 files changed, 4 insertions, 6 deletions
diff --git a/stdlib/source/library/lux/math/number/nat.lux b/stdlib/source/library/lux/math/number/nat.lux
index c52647e32..9ead2ee82 100644
--- a/stdlib/source/library/lux/math/number/nat.lux
+++ b/stdlib/source/library/lux/math/number/nat.lux
@@ -49,9 +49,8 @@
(def: .public (<= reference sample)
(-> Nat Nat Bit)
- (if (..< reference sample)
- #1
- ("lux i64 =" reference sample)))
+ (or (..< reference sample)
+ ("lux i64 =" reference sample)))
(def: .public (> reference sample)
(-> Nat Nat Bit)
@@ -59,9 +58,8 @@
(def: .public (>= reference sample)
(-> Nat Nat Bit)
- (if (..< sample reference)
- #1
- ("lux i64 =" reference sample)))
+ (or (..< sample reference)
+ ("lux i64 =" reference sample)))
(template [<name> <test>]
[(def: .public (<name> left right)