Exponentiation with infix operators in (or operating on) the base: Difference between revisions

Content deleted Content added

Inline

@@ Line 59: / Line 59: @@
 =={{header|Factor}}==
-<lang factor>USING: arrays infix locals prettyprint sequences
+<lang factor>USING: infix locals prettyprint sequences
 sequences.generalizations sequences.repeating ;
@@ Line 68: / Line 68: @@
     "-(x**p)" [infix -(x**p) infix] 10 narray ;
-"x value" "p value" 2array
+{ "x value" "p value" } { "expression" "result" } 8 cycle append
-{ "expression" "result" } 8 cycle append
 -5 2 row
 -5 3 row
 2 row
+3 row
-3 row 5 narray simple-table.</lang>
+narray simple-table.</lang>
 {{out}}
 <pre>