diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/control/number.lux | 8 | ||||
| -rw-r--r-- | stdlib/source/lux/data/number.lux | 3 | ||||
| -rw-r--r-- | stdlib/source/lux/math/ratio.lux | 1 |
3 files changed, 2 insertions, 10 deletions
diff --git a/stdlib/source/lux/control/number.lux b/stdlib/source/lux/control/number.lux index e24d61d9b..52ed7bf0f 100644 --- a/stdlib/source/lux/control/number.lux +++ b/stdlib/source/lux/control/number.lux @@ -1,14 +1,10 @@ (;module: - lux - (lux/control [ord])) + lux) ## [Signatures] (sig: #export (Number n) {#;doc "Everything that should be expected of a number type."} - - (: (ord;Ord n) - ord) - + (do-template [<name>] [(: (-> n n n) <name>)] [+] [-] [*] [/] [%]) diff --git a/stdlib/source/lux/data/number.lux b/stdlib/source/lux/data/number.lux index ab097e449..998b42ea8 100644 --- a/stdlib/source/lux/data/number.lux +++ b/stdlib/source/lux/data/number.lux @@ -36,7 +36,6 @@ ) (struct: #export _ (Number Nat) - (def: ord Ord<Nat>) (def: + n.+) (def: - n.-) (def: * n.*) @@ -52,7 +51,6 @@ (do-template [<type> <ord> <+> <-> <*> </> <%> <=> <<> <0> <1> <-1>] [(struct: #export _ (Number <type>) - (def: ord <ord>) (def: + <+>) (def: - <->) (def: * <*>) @@ -75,7 +73,6 @@ ) (struct: #export _ (Number Deg) - (def: ord Ord<Deg>) (def: + d.+) (def: - d.-) (def: * d.*) diff --git a/stdlib/source/lux/math/ratio.lux b/stdlib/source/lux/math/ratio.lux index 5d23f6961..fb86b1fed 100644 --- a/stdlib/source/lux/math/ratio.lux +++ b/stdlib/source/lux/math/ratio.lux @@ -109,7 +109,6 @@ (def: >= q.>=)) (struct: #export _ (Number Ratio) - (def: ord Ord<Ratio>) (def: + q.+) (def: - q.-) (def: * q.*) |