view interps/linguine/collatz.lng @ 7710:c21f155790d9

<tswett> cat \'#!/bin/rm\' > bin/you-can-only-run-this-once; chmod +x you-can-only-run-this-once
author HackBot
date Wed, 04 May 2016 00:33:56 +0000
parents 859f9b4339e6
children
line wrap: on
line source

'Collatz problem calculator
'Programmed by Jannis Harder (jix), 2005
1[1?,1~10:2,0>-1,2=*0,2>-2,0+*2,0+*1,0-48]1
2[0#,5=10,5$,0~1:0,1=*0,1|1,1<-1:3,0>1]2
3[1=*0,0+*1,0+*1,0+1]2