Van Eck sequence: Difference between revisions

Content added Content deleted
(Added Quackery.)
Line 2,525: Line 2,525:
swap 1 - times
swap 1 - times
[ dup behead swap find
[ dup behead swap find
2dup swap size 1 - <
2dup 1+ swap found
iff 1+ else [ drop 0 ]
iff 1+ else [ drop 0 ]
swap join ]
swap join ]
Line 2,531: Line 2,531:


10 van-eck echo cr
10 van-eck echo cr
1000 van-eck -10 split echo drop</lang>
1000 van-eck -10 split echo drop </lang>


{{out}}
{{out}}