equal
deleted
inserted
replaced
178 |
178 |
179 (** Session keys are not used to encrypt other session keys **) |
179 (** Session keys are not used to encrypt other session keys **) |
180 |
180 |
181 Goal "evs : kerberos_ban ==> \ |
181 Goal "evs : kerberos_ban ==> \ |
182 \ ALL K KK. KK <= - (range shrK) --> \ |
182 \ ALL K KK. KK <= - (range shrK) --> \ |
183 \ (Key K : analz (Key``KK Un (spies evs))) = \ |
183 \ (Key K : analz (Key`KK Un (spies evs))) = \ |
184 \ (K : KK | Key K : analz (spies evs))"; |
184 \ (K : KK | Key K : analz (spies evs))"; |
185 by (etac kerberos_ban.induct 1); |
185 by (etac kerberos_ban.induct 1); |
186 by analz_spies_tac; |
186 by analz_spies_tac; |
187 by (REPEAT_FIRST (resolve_tac [allI, impI])); |
187 by (REPEAT_FIRST (resolve_tac [allI, impI])); |
188 by (REPEAT_FIRST (rtac analz_image_freshK_lemma)); |
188 by (REPEAT_FIRST (rtac analz_image_freshK_lemma)); |