Tropical algebra overloading: Difference between revisions
Content added Content deleted
(Add Factor) |
m (→{{header|Factor}}: change names, tweak output) |
||
Line 35:
<lang factor>USING: io kernel math math.order present prettyprint sequences ;
ALIAS:
ALIAS:
ALIAS:
: show ( quot -- )
dup present rest but-last "
{
[ 2 -2
[ -0.001 -1/0.
[ 0 -1/0.
[ 1.5 -1
[ -0.5 0
[ 5 7
[ 8 7
[ 5 8
[ 8 7
} [ show ] each</lang>
{{out}}
<pre>
2 -2
-0.001 -1/0.
0 -1/0.
1.5 -1
-0.5 0
5 7
8 7
5 8
8 7
</pre>
|