1563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark// The Computer Language Shootout 2563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark// http://shootout.alioth.debian.org/ 3563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark// contributed by Isaac Gouy 4563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark 5563af33bc48281d19dce701398dbb88cb54fd7ecCary Clarkfunction ack(m,n){ 6563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark if (m==0) { return n+1; } 7563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark if (n==0) { return ack(m-1,1); } 8563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark return ack(m-1, ack(m,n-1) ); 9563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark} 10563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark 11563af33bc48281d19dce701398dbb88cb54fd7ecCary Clarkfunction fib(n) { 12563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark if (n < 2){ return 1; } 13563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark return fib(n-2) + fib(n-1); 14563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark} 15563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark 16563af33bc48281d19dce701398dbb88cb54fd7ecCary Clarkfunction tak(x,y,z) { 17563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark if (y >= x) return z; 18563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark return tak(tak(x-1,y,z), tak(y-1,z,x), tak(z-1,x,y)); 19563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark} 20563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark 21563af33bc48281d19dce701398dbb88cb54fd7ecCary Clarkfor ( var i = 3; i <= 5; i++ ) { 22563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark ack(3,i); 23563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark fib(17.0+i); 24563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark tak(3*i+3,2*i+2,i+1); 25563af33bc48281d19dce701398dbb88cb54fd7ecCary Clark} 26