changeset 7224 | e41e64476f9b |
parent 7032 | d6efb3b8e669 |
child 8000 | acafa0f15131 |
--- a/src/HOL/List.thy Mon Aug 16 22:04:07 1999 +0200 +++ b/src/HOL/List.thy Mon Aug 16 22:07:12 1999 +0200 @@ -8,7 +8,7 @@ List = Datatype + WF_Rel + NatBin + -datatype 'a list = "[]" ("[]") | "#" 'a ('a list) (infixr 65) +datatype 'a list = Nil ("[]") | Cons 'a ('a list) (infixr "#" 65) consts "@" :: ['a list, 'a list] => 'a list (infixr 65)