src/HOL/Auth/NS_Public_Bad.thy
changeset 58023 e8d5d60d655e
parent 39190 b1a7bef0907a
child 59180 85ec71012df8
     1.1 --- a/src/HOL/Auth/NS_Public_Bad.thy	Thu Apr 24 10:33:17 2014 +0200
     1.2 +++ b/src/HOL/Auth/NS_Public_Bad.thy	Thu Apr 24 17:52:19 2014 +0200
     1.3 @@ -44,8 +44,7 @@
     1.4  
     1.5  declare knows_Spy_partsEs [elim]
     1.6  declare analz_into_parts [dest]
     1.7 -declare Fake_parts_insert_in_Un  [dest]
     1.8 -declare image_eq_UN [simp]  (*accelerates proofs involving nested images*)
     1.9 +declare Fake_parts_insert_in_Un [dest]
    1.10  
    1.11  (*A "possibility property": there are traces that reach the end*)
    1.12  lemma "\<exists>NB. \<exists>evs \<in> ns_public. Says A B (Crypt (pubEK B) (Nonce NB)) \<in> set evs"