# HG changeset patch # User nipkow # Date 904147684 -7200 # Node ID f5a0de92bcc8285577e15025fe013864581629ef # Parent efb799c5ed3c17faaf5050eb9b802cf9655b13ba junk diff -r efb799c5ed3c -r f5a0de92bcc8 doc-src/Tutorial/Misc/Itrev.thy~ --- a/doc-src/Tutorial/Misc/Itrev.thy~ Wed Aug 26 17:27:27 1998 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,6 +0,0 @@ -Itrev = Main + -consts itrev :: 'a list => 'a list => 'a list -primrec itrev list -"itrev [] ys = ys" -"itrev (x#xs) ys = itrev xs (x#ys)" -end