src/Doc/Tutorial/Datatype/unfoldnested.thy

more compact representation of theory_id -- via consecutive thread-local ids;

(*<*)
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
(*>*)