tr is (again) type abbrev;
authorwenzelm
Tue, 11 Mar 1997 14:21:10 +0100
changeset 2782 5e8771682c73
parent 2781 0d6fcae3ae45
child 2783 7d0ec11966d4
tr is (again) type abbrev;
src/HOLCF/Tr.thy
--- 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"