Integer roots: Difference between revisions
Content added Content deleted
(Added Quackery.) |
m (→{{header|Quackery}}: typo in stack comment) |
||
| Line 946: | Line 946: | ||
unrot ** |
unrot ** |
||
b share swap / + |
b share swap / + |
||
swap 1+ / ] is nextapprox ( |
swap 1+ / ] is nextapprox ( n --> n ) |
||
[ over 2 < iff drop done |
[ over 2 < iff drop done |
||