src/HOLCF/Tr.thy
changeset 2782 5e8771682c73
parent 2766 3e90c5187ce1
child 3036 5aa3bb94b729
--- a/src/HOLCF/Tr.thy	Tue Mar 11 13:05:40 1997 +0100
+++ b/src/HOLCF/Tr.thy	Tue Mar 11 14:21:10 1997 +0100
@@ -8,10 +8,11 @@
 
 Tr = Lift +
 
-syntax
-  tr	:: "type"
+types
+  tr = "bool lift"
+
 translations
-  "tr" == (type) "bool lift" 
+  "tr" <= (type) "bool lift" 
 
 consts
 	TT,FF           :: "tr"