changeset 16173 | 9e2f6c0a779d |
parent 16156 | 2f6fc19aba1e |
child 16563 | a92f96951355 |
--- a/src/HOL/Tools/res_axioms.ML Wed Jun 01 14:50:48 2005 +0200 +++ b/src/HOL/Tools/res_axioms.ML Wed Jun 01 18:19:59 2005 +0200 @@ -187,7 +187,7 @@ (* transform an Isabelle thm into CNF *) fun cnf_axiom_aux th = - map (zero_var_indexes o Thm.varifyT) + map zero_var_indexes (rm_redundant_cls (cnf_rule (transfer_to_Reconstruction th)));