25 lines
395 B
Beef
25 lines
395 B
Beef
|
|
[1024 = 2^3 * 2^3 * 2^4]
|
||
|
|
++++++++[->++++++++[->++++++++++++++++<]<]>>
|
||
|
|
|
||
|
|
[
|
||
|
|
>[-]>[-]+>[-]+<
|
||
|
|
[
|
||
|
|
>[-<-
|
||
|
|
<<[->+>+<<]
|
||
|
|
>[-<+>]>>
|
||
|
|
]
|
||
|
|
++++++++++>[-]+>[-]>[-]>[-]<<<<<
|
||
|
|
[->-[>+>>]>[[-<+>]+>+>>]<<<<<]
|
||
|
|
>>-[-<<+>>]
|
||
|
|
<[-]++++++++[-<++++++>]
|
||
|
|
>>[-<<+>>]
|
||
|
|
<<
|
||
|
|
]
|
||
|
|
<[.[-]<]
|
||
|
|
<
|
||
|
|
|
||
|
|
>>+++++++++++++.---.[-]<<
|
||
|
|
Set divisor to 2
|
||
|
|
>++>+<< [->-[>+>>]>[[-<+>]+>+>>]<<<<<]
|
||
|
|
>>> ]
|