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

20 lines
135 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
{def while
{lambda {:i}
{if {< :i 1}
then
else {br}:i {while {/ :i 2}}}}}
{while 1024} ->
1024
512
256
128
64
32
16
8
4
2
1