RosettaCodeData/Task/Loops-While/Lambdatalk/loops-while-1.lambdatalk

10 lines
191 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
{def loops_while
{lambda {:i}
{if {< :i 1}
then (end of loop)
else :i {loops_while {/ :i 2}}}}}
-> loops_while
{loops_while 1024}
-> 1024 512 256 128 64 32 16 8 4 2 1 (end of loop)