diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/test/lux/math/number/complex.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/test/lux/math/number/complex.lux b/stdlib/source/test/lux/math/number/complex.lux index a1ebf331d..e5f43c47d 100644 --- a/stdlib/source/test/lux/math/number/complex.lux +++ b/stdlib/source/test/lux/math/number/complex.lux @@ -30,15 +30,15 @@ (do {! random.monad} [factor (|> random.nat (\ ! map (|>> (n.% 1000) (n.max 1)))) measure (|> random.safe_frac (random.only (f.> +0.0)))] - (wrap (f.* (|> factor .int int.frac) - measure)))) + (in (f.* (|> factor .int int.frac) + measure)))) (def: #export random (Random /.Complex) (do random.monad [real ..dimension imaginary ..dimension] - (wrap (/.complex real imaginary)))) + (in (/.complex real imaginary)))) (def: angle (Random /.Complex) |