--- a/src/HOLCF/Tools/Domain/domain_axioms.ML Wed Mar 03 08:20:20 2010 -0800
+++ b/src/HOLCF/Tools/Domain/domain_axioms.ML Wed Mar 03 08:26:01 2010 -0800
@@ -25,6 +25,10 @@
open HOLCF_Library;
+infixr 6 ->>;
+infix -->>;
+infix 9 `;
+
fun axiomatize_isomorphism
(dbind : binding, (lhsT, rhsT))
(thy : theory)
--- a/src/HOLCF/Tools/Domain/domain_constructors.ML Wed Mar 03 08:20:20 2010 -0800
+++ b/src/HOLCF/Tools/Domain/domain_constructors.ML Wed Mar 03 08:26:01 2010 -0800
@@ -35,8 +35,10 @@
struct
open HOLCF_Library;
+
infixr 6 ->>;
infix -->>;
+infix 9 `;
(************************** miscellaneous functions ***************************)