
diff -r 5eb932e604a2 -r eab6ce8368fa src/HOL/Library/Mapping.thy
--- a/src/HOL/Library/Mapping.thy	Wed Jan 10 15:21:49 2018 +0100
+++ b/src/HOL/Library/Mapping.thy	Wed Jan 10 15:25:09 2018 +0100
@@ -223,7 +223,7 @@
 lemma [transfer_rule]:
   assumes [transfer_rule]: "bi_total A"
     and [transfer_rule]: "bi_unique B"
-  shows "(pcr_mapping A B ===> pcr_mapping A B ===> op=) HOL.eq HOL.equal"
+  shows "(pcr_mapping A B ===> pcr_mapping A B ===> (=)) HOL.eq HOL.equal"
   unfolding equal by transfer_prover
 
 lemma of_alist_transfer [transfer_rule]:




