--- a/src/HOL/Map.thy Tue Aug 17 11:00:24 2004 +0200 +++ b/src/HOL/Map.thy Wed Aug 18 11:09:40 2004 +0200 @@ -9,7 +9,7 @@ header {* Maps *} theory Map -import List +imports List begin types ('a,'b) "~=>" = "'a => 'b option" (infixr 0)