changeset 55525 | 70b7e91fa1f9 |
parent 55524 | f41ef840f09d |
child 55531 | 601ca8efa000 |
--- a/src/HOL/List.thy Sun Feb 16 21:33:28 2014 +0100 +++ b/src/HOL/List.thy Sun Feb 16 21:33:28 2014 +0100 @@ -6779,7 +6779,7 @@ unfolding List.insert_def [abs_def] by transfer_prover lemma find_transfer [transfer_rule]: - "((A ===> op =) ===> list_all2 A ===> option_rel A) List.find List.find" + "((A ===> op =) ===> list_all2 A ===> rel_option A) List.find List.find" unfolding List.find_def by transfer_prover lemma remove1_transfer [transfer_rule]: