Exponentiation with infix operators in (or operating on) the base: Difference between revisions
Content deleted Content added
Add Factor |
m →{{header|Factor}}: array literals are a thing |
||
Line 59: | Line 59: | ||
=={{header|Factor}}== |
=={{header|Factor}}== |
||
<lang factor>USING: |
<lang factor>USING: infix locals prettyprint sequences |
||
sequences.generalizations sequences.repeating ; |
sequences.generalizations sequences.repeating ; |
||
Line 68: | Line 68: | ||
"-(x**p)" [infix -(x**p) infix] 10 narray ; |
"-(x**p)" [infix -(x**p) infix] 10 narray ; |
||
"x value" "p value" |
{ "x value" "p value" } { "expression" "result" } 8 cycle append |
||
{ "expression" "result" } 8 cycle append |
|||
-5 2 row |
-5 2 row |
||
-5 3 row |
-5 3 row |
||
5 2 row |
5 2 row |
||
5 3 row |
|||
5 narray simple-table.</lang> |
|||
{{out}} |
{{out}} |
||
<pre> |
<pre> |