RosettaCodeData/Task/Integer-sequence/Deja-Vu/integer-sequence.djv
2014-01-17 05:34:36 +00:00

7 lines
42 B
Text

1
while /= -- dup dup:
!. dup
++
drop