src/Pure/subgoal.ML
changeset 30552 58db56278478
parent 29606 fedb8be05f24
child 31794 71af1fd6a5e4
     1.1 --- a/src/Pure/subgoal.ML	Mon Mar 16 19:40:03 2009 +0100
     1.2 +++ b/src/Pure/subgoal.ML	Mon Mar 16 23:36:55 2009 +0100
     1.3 @@ -29,7 +29,7 @@
     1.4  fun focus ctxt i st =
     1.5    let
     1.6      val ((schematics, [st']), ctxt') =
     1.7 -      Variable.import_thms true [MetaSimplifier.norm_hhf_protect st] ctxt;
     1.8 +      Variable.import_thms true [Simplifier.norm_hhf_protect st] ctxt;
     1.9      val ((params, goal), ctxt'') = Variable.focus_subgoal i st' ctxt';
    1.10      val asms = Drule.strip_imp_prems goal;
    1.11      val concl = Drule.strip_imp_concl goal;