doc-src/Intro/list.thy

canonical 'cases'/'induct' rules for n-tuples (n=3..7)
(really belongs to theory Product_Type, but doesn't work there yet)

List = FOL +
types 	list 1
arities list	:: (term)term
consts	Nil	:: "'a list"
   	Cons	:: "['a, 'a list] => 'a list" 
end