Sattolo cycle: Difference between revisions

m
add RPL
(add RPL)
m (add RPL)
Line 2,042:
≪ DUP SIZE 1 '''FOR''' j
j 1 - RAND * FLOOR 1 +
DUP2 GET 3 PICK j GET SWAP 4 ROLLD PUT j ROT PUT
SWAP
4 ROLLD PUT j ROT PUT
-1 '''STEP'''
≫ ‘'''SATLO'''’ STO
1,150

edits