src/HOL/Auth/NS_Public_Bad.ML
changeset 4477 b3e5857d8d99
parent 4476 fbdc87f8ac7e
child 4551 41fa62c229c3
     1.1 --- a/src/HOL/Auth/NS_Public_Bad.ML	Tue Dec 23 11:56:09 1997 +0100
     1.2 +++ b/src/HOL/Auth/NS_Public_Bad.ML	Wed Dec 24 10:02:30 1997 +0100
     1.3 @@ -33,7 +33,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 @@ -286,7 +286,7 @@
    1.13  (*NS3: unicity of NB identifies A and NA, but not B*)
    1.14  by (forw_inst_tac [("A'","A")] (Says_imp_spies RS parts.Inj RS unique_NB) 1
    1.15      THEN REPEAT (eresolve_tac [asm_rl, Says_imp_spies RS parts.Inj] 1));
    1.16 -by (Auto_tac());
    1.17 +by Auto_tac;
    1.18  by (rename_tac "C B' evs3" 1);
    1.19  
    1.20  (*