src/Pure/Isar/method.ML
changeset 35624 c4e29a0bb8c1
parent 33522 737589bb9bb8
child 35625 9c818cab0dd0
equal deleted inserted replaced
35623:b0de8551fadf 35624:c4e29a0bb8c1
   163 fun elim ths = SIMPLE_METHOD' (CHANGED_PROP o REPEAT_ALL_NEW (Tactic.ematch_tac ths));
   163 fun elim ths = SIMPLE_METHOD' (CHANGED_PROP o REPEAT_ALL_NEW (Tactic.ematch_tac ths));
   164 
   164 
   165 
   165 
   166 (* unfold/fold definitions *)
   166 (* unfold/fold definitions *)
   167 
   167 
   168 fun unfold_meth ths ctxt = SIMPLE_METHOD (CHANGED_PROP (LocalDefs.unfold_tac ctxt ths));
   168 fun unfold_meth ths ctxt = SIMPLE_METHOD (CHANGED_PROP (Local_Defs.unfold_tac ctxt ths));
   169 fun fold_meth ths ctxt = SIMPLE_METHOD (CHANGED_PROP (LocalDefs.fold_tac ctxt ths));
   169 fun fold_meth ths ctxt = SIMPLE_METHOD (CHANGED_PROP (Local_Defs.fold_tac ctxt ths));
   170 
   170 
   171 
   171 
   172 (* atomize rule statements *)
   172 (* atomize rule statements *)
   173 
   173 
   174 fun atomize false = SIMPLE_METHOD' (CHANGED_PROP o ObjectLogic.atomize_prems_tac)
   174 fun atomize false = SIMPLE_METHOD' (CHANGED_PROP o ObjectLogic.atomize_prems_tac)