author | wenzelm |
Tue, 27 Aug 2002 11:03:02 +0200 | |
changeset 13523 | 079af5c90d1c |
parent 13522 | 934fffeb6f38 |
child 13524 | 604d0f3622d6 |
--- a/src/HOL/Auth/Guard/Guard_Shared.thy Tue Aug 27 10:59:21 2002 +0200 +++ b/src/HOL/Auth/Guard/Guard_Shared.thy Tue Aug 27 11:03:02 2002 +0200 @@ -99,7 +99,7 @@ lemma guard_ciph [simp]: "shrK A:Ks ==> Ciph A X:guard n Ks" by (rule Guard_Nonce, simp) -lemma guard_ciph [simp]: "shrK A:Ks ==> Ciph A X:guardK n Ks" +lemma guardK_ciph [simp]: "shrK A:Ks ==> Ciph A X:guardK n Ks" by (rule Guard_Key, simp) lemma Guard_init [iff]: "Guard n Ks (initState B)"