aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/math/modular.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/test/lux/math/modular.lux')
-rw-r--r--stdlib/source/test/lux/math/modular.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/test/lux/math/modular.lux b/stdlib/source/test/lux/math/modular.lux
index bee6e09a5..f9d17a318 100644
--- a/stdlib/source/test/lux/math/modular.lux
+++ b/stdlib/source/test/lux/math/modular.lux
@@ -66,10 +66,10 @@
(case (|> param
(\ (/.codec param\\%) encoded)
(\ (/.codec subject\\%) decoded))
- {#try.Failure error}
+ {try.#Failure error}
(exception.match? /.incorrect_modulus error)
- {#try.Success _}
+ {try.#Success _}
false))
(_.cover [/.modulus]
(and (type\= (:of (/.modulus subject))
@@ -96,13 +96,13 @@
co_prime? (i.co_prime? (//.divisor (/.modulus subject))
(/.value subject))]
(case (/.inverse subject)
- {#.Some subject^-1}
+ {.#Some subject^-1}
(and co_prime?
(|> subject
(/.* subject^-1)
(/.= one)))
- #.None
+ {.#None}
(not co_prime?))))
(_.cover [/.adapter]
(<| (try.else false)
@@ -116,9 +116,9 @@
(/.= subject))))))
(_.cover [/.moduli_are_not_equal]
(case (/.adapter subject\\% param\\%)
- {#try.Failure error}
+ {try.#Failure error}
(exception.match? /.moduli_are_not_equal error)
- {#try.Success _}
+ {try.#Success _}
false))
)))))