src/Doc/Tutorial/Datatype/unfoldnested.thy
changeset 48985 5386df44a037
parent 16417 9bc16273c2d4
child 58860 fee7cfa69c50
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/Doc/Tutorial/Datatype/unfoldnested.thy	Tue Aug 28 18:57:32 2012 +0200
@@ -0,0 +1,8 @@
+(*<*)
+theory unfoldnested imports Main begin;
+(*>*)
+datatype ('v,'f)"term" = Var 'v | App 'f "('v,'f)term_list"
+and ('v,'f)term_list = Nil | Cons "('v,'f)term" "('v,'f)term_list"
+(*<*)
+end
+(*>*)