diff -r d4866f6ff2f9 -r 40d66bc3e83f doc-src/Tutorial/Recdef/fib --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/doc-src/Tutorial/Recdef/fib Tue Jan 12 15:49:13 1999 +0100 @@ -0,0 +1,5 @@ +consts fib :: nat => nat +recdef fib "measure(%n. n)" + "fib 0 = 0" + "fib 1 = 1" + "fib (Suc(Suc x)) = fib x + fib (Suc x)"