Two identical strings: Difference between revisions

m
RPL: optimized version
m (RPL: optimized version)
m (RPL: optimized version)
Line 3,881:
SWAP R→B →STR 2 OVER SIZE 1 - SUB + + 4 ROLLD
SWAP 1 +
'''UNTIL''' SWAP 1000 ≥ '''END''' DROP2
≫ ''''TASK'''' STO
|
1,150

edits