blob: b0162481bc2acd12a876ef1d661c472c00066916 [file] [log] [blame]
<html>
<head>
<script src="../htmlrunner.js"></script>
<script>
// The Computer Language Shootout
// http://shootout.alioth.debian.org/
// contributed by Isaac Gouy
function ack(m,n){
if (m==0) { return n+1; }
if (n==0) { return ack(m-1,1); }
return ack(m-1, ack(m,n-1) );
}
function fib(n) {
if (n < 2){ return 1; }
return fib(n-2) + fib(n-1);
}
function tak(x,y,z) {
if (y >= x) return z;
return tak(tak(x-1,y,z), tak(y-1,z,x), tak(z-1,x,y));
}
window.onload = function(){ startTest("sunspider-controlflow-recursive", '558ed308');
test("Ack", function(){
for ( var i = 3; i <= 5; i++ )
ack(3,i);
});
test("Fib", function(){
for ( var i = 3; i <= 5; i++ )
fib(17.0+i);
});
test("Tak", function(){
for ( var i = 3; i <= 5; i++ )
tak(3*i+3,2*i+2,i+1);
});
endTest(); };
</script>
</head>
<body></body>
</html>