src/HOL/HOL.thy
changeset 14590 276ef51cedbf
parent 14565 c6dc17aab88a
child 14690 f61ea8bfa81e
     1.1 --- a/src/HOL/HOL.thy	Fri Apr 16 13:51:04 2004 +0200
     1.2 +++ b/src/HOL/HOL.thy	Fri Apr 16 13:52:43 2004 +0200
     1.3 @@ -1022,15 +1022,13 @@
     1.4  
     1.5    end);  (* struct *)
     1.6  
     1.7 -Context.>> (fn thy => (simpset_ref_of thy :=
     1.8 -  simpset_of thy
     1.9 +simpset_ref() := simpset ()
    1.10      addSolver (mk_solver "Trans_linear" (fn _ => Trans_Tac.linear_tac))
    1.11      addSolver (mk_solver "Trans_partial" (fn _ => Trans_Tac.partial_tac));
    1.12    (* Adding the transitivity reasoners also as safe solvers showed a slight
    1.13       speed up, but the reasoning strength appears to be not higher (at least
    1.14       no breaking of additional proofs in the entire HOL distribution, as
    1.15       of 5 March 2004, was observed). *)
    1.16 -  thy))
    1.17  *}
    1.18  
    1.19  (* Optional methods