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]: