doc-src/Intro/list.thy

replace list_map function with an abbreviation

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