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