changeset 47050 | 7be54568efa1 |
parent 43587 | 0dd418de22ce |
child 55417 | 01fbfb60c33e |
--- a/src/HOL/Auth/KerberosV.thy Tue Mar 20 13:53:09 2012 +0100 +++ b/src/HOL/Auth/KerberosV.thy Tue Mar 20 13:53:09 2012 +0100 @@ -680,7 +680,7 @@ txt{*K4*} apply (force dest!: Crypt_imp_keysFor) txt{*K6*} -apply (metis Says_imp_spies Says_ticket_parts analz.Fst analz.Inj analz_conj_parts unique_CryptKey) +apply (metis MPair_parts Says_imp_parts_knows_Spy unique_CryptKey) done text{*Needs a unicity theorem, hence moved here*}