changeset 14269 | 502a7c95de73 |
parent 13187 | e5434b822a96 |
child 14334 | 6137d24eef79 |
--- a/src/HOL/Hyperreal/MacLaurin.ML Thu Nov 27 10:47:55 2003 +0100 +++ b/src/HOL/Hyperreal/MacLaurin.ML Fri Nov 28 12:09:37 2003 +0100 @@ -317,7 +317,7 @@ by (induct_tac "n" 1); by (Simp_tac 1); by Auto_tac; -by (cut_inst_tac [("R1.0","x"),("R2.0","0")] real_linear 1); +by (cut_inst_tac [("x","x"),("y","0")] linorder_less_linear 1); by Auto_tac; by (cut_inst_tac [("f","diff 0"), ("diff","diff"),