7 lines
211 B
Text
7 lines
211 B
Text
(over over + rolldown pop pick +) :next
|
|
(('print dip " " print! next) 25 times newline) :leo
|
|
|
|
"First 25 Leonardo numbers:" puts!
|
|
1 1 1 leo
|
|
"First 25 Leonardo numbers with add=0, L(0)=0, L(1)=1:" puts!
|
|
0 0 1 leo
|