Mosaic matrix: Difference between revisions
→{{header|RPL}}: one-liner
(add RPL) |
(→{{header|RPL}}: one-liner) |
||
Line 1,358:
[ 0 1 0 1 ]]
</pre>
This stack-only one-liner can run only on HP-48G and newer models, due to the presence of the <code>∑LIST</code> instruction:
≪ DUP 2 →LIST DUP 0 CON SWAP SIGN '''DO''' DUP ∑LIST 2 MOD NOT PUTI '''UNTIL''' -64 FS? '''END''' DROP ≫ ‘<span style="color:blue">'''MOZTX'''</span>’ STO
=={{header|Sidef}}==
| |||