src/HOL/Auth/NS_Public.ML
changeset 4477 b3e5857d8d99
parent 4470 af3239def3d4
child 4556 e7a4683c0026
     1.1 --- a/src/HOL/Auth/NS_Public.ML	Tue Dec 23 11:56:09 1997 +0100
     1.2 +++ b/src/HOL/Auth/NS_Public.ML	Wed Dec 24 10:02:30 1997 +0100
     1.3 @@ -36,7 +36,7 @@
     1.4  (*Nobody sends themselves messages*)
     1.5  goal thy "!!evs. evs : ns_public ==> ALL A X. Says A A X ~: set evs";
     1.6  by (etac ns_public.induct 1);
     1.7 -by (Auto_tac());
     1.8 +by Auto_tac;
     1.9  qed_spec_mp "not_Says_to_self";
    1.10  Addsimps [not_Says_to_self];
    1.11  AddSEs   [not_Says_to_self RSN (2, rev_notE)];
    1.12 @@ -66,7 +66,7 @@
    1.13  
    1.14  goal thy 
    1.15   "!!A. evs: ns_public ==> (Key (priK A) : analz (spies evs)) = (A : bad)";
    1.16 -by (Auto_tac());
    1.17 +by Auto_tac;
    1.18  qed "Spy_analz_priK";
    1.19  Addsimps [Spy_analz_priK];
    1.20