diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/library/lux/math.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/library/lux/math.lux b/stdlib/source/library/lux/math.lux index 028ed346b..c9cbed213 100644 --- a/stdlib/source/library/lux/math.lux +++ b/stdlib/source/library/lux/math.lux @@ -62,17 +62,17 @@ last prevs))))) -(for @.old (as_is) +(for @.old (these) (with_expansions [<@> (static.text (let [[@ _] (symbol .._)] @)) <ratio/0> [ratio.#numerator 0 ratio.#denominator 1] <ratio/1> [ratio.#numerator 1 ratio.#denominator 1] <complex/0> [complex.#real +0.0 complex.#imaginary +0.0] <complex/1> [complex.#real +1.0 complex.#imaginary +0.0]] - (as_is (template [<name> <scenarios>'] + (these (template [<name> <scenarios>'] [(with_expansions [<extension> (static.seed) <extension> (template.text [<@> " " <extension>]) <scenarios> (template.spliced <scenarios>')] - (as_is (analysis: (<extension> self phase archive [operands (<>.some <code>.any)]) + (these (analysis: (<extension> self phase archive [operands (<>.some <code>.any)]) (<| type.with_var (function (_ [$it :it:])) (do [! phase.monad] @@ -141,7 +141,7 @@ [(with_expansions [<extension> (static.seed) <extension> (template.text [<@> " " <extension>]) <scenarios> (template.spliced <scenarios>')] - (as_is (analysis: (<extension> self phase archive [left <code>.any + (these (analysis: (<extension> self phase archive [left <code>.any right <code>.any]) (<| type.with_var (function (_ [$it :it:])) @@ -196,7 +196,7 @@ [(with_expansions [<extension> (static.seed) <extension> (template.text [<@> " " <extension>]) <scenarios> (template.spliced <scenarios>')] - (as_is (analysis: (<extension> self phase archive [left <code>.any + (these (analysis: (<extension> self phase archive [left <code>.any right <code>.any]) (<| type.with_var (function (_ [$it :it:])) |