src/HOL/Tools/Quotient/quotient_term.ML
changeset 38795 848be46708dc
parent 38718 c7cbbb18eabe
child 38864 4abe644fcea5
--- a/src/HOL/Tools/Quotient/quotient_term.ML	Fri Aug 27 10:55:20 2010 +0200
+++ b/src/HOL/Tools/Quotient/quotient_term.ML	Fri Aug 27 10:56:46 2010 +0200
@@ -485,7 +485,7 @@
        end
 
   | (Const (@{const_name Ex1}, ty) $ (Abs (_, _,
-      (Const (@{const_name "op &"}, _) $ (Const (@{const_name Set.member}, _) $ _ $
+      (Const (@{const_name HOL.conj}, _) $ (Const (@{const_name Set.member}, _) $ _ $
         (Const (@{const_name Respects}, _) $ resrel)) $ (t $ _)))),
      Const (@{const_name Ex1}, ty') $ t') =>
        let