Mercurial > repo

diff interps/linguine/collatz.lng @ 996:859f9b4339e6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<Gregor> tar xf egobot.tar.xz
author HackBot
date Sun, 09 Dec 2012 19:30:08 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/interps/linguine/collatz.lng	Sun Dec 09 19:30:08 2012 +0000
@@ -0,0 +1,5 @@
+'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