--- a/doc-src/Tutorial/Misc/NatSum.thy Mon Nov 29 11:18:16 2004 +0100 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,6 +0,0 @@ -NatSum = Main + -consts sum :: nat => nat -primrec -"sum 0 = 0" -"sum (Suc n) = Suc n + sum n" -end