src/HOL/Auth/WooLam.ML
changeset 4477 b3e5857d8d99
parent 4470 af3239def3d4
child 5076 fbc9d95b62ba
     1.1 --- a/src/HOL/Auth/WooLam.ML	Tue Dec 23 11:56:09 1997 +0100
     1.2 +++ b/src/HOL/Auth/WooLam.ML	Wed Dec 24 10:02:30 1997 +0100
     1.3 @@ -37,7 +37,7 @@
     1.4  (*Nobody sends themselves messages*)
     1.5  goal thy "!!evs. evs : woolam ==> ALL A X. Says A A X ~: set evs";
     1.6  by (etac woolam.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 @@ -72,7 +72,7 @@
    1.13  
    1.14  goal thy 
    1.15   "!!evs. evs : woolam ==> (Key (shrK A) : analz (spies evs)) = (A : bad)";
    1.16 -by (Auto_tac());
    1.17 +by Auto_tac;
    1.18  qed "Spy_analz_shrK";
    1.19  Addsimps [Spy_analz_shrK];
    1.20