src/HOL/List.thy
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)