Negative base numbers: Difference between revisions
→{{header|Factor}}: simplify
(Add Factor) |
(→{{header|Factor}}: simplify) |
||
Line 499:
: /mod* ( x y -- z w )
[ /mod ] keep '[ [ 1 + ]
: >nega ( n radix -- str )
|
(Add Factor) |
(→{{header|Factor}}: simplify) |
||
Line 499:
: /mod* ( x y -- z w )
[ /mod ] keep '[ [ 1 + ]
: >nega ( n radix -- str )
|
edits