src/HOLCF/IOA/NTP/Impl.ML
changeset 16734 2c76db916c51
parent 15408 6001135caa91
child 17244 0b2ff9541727
--- a/src/HOLCF/IOA/NTP/Impl.ML	Thu Jul 07 12:39:17 2005 +0200
+++ b/src/HOLCF/IOA/NTP/Impl.ML	Thu Jul 07 12:42:21 2005 +0200
@@ -176,7 +176,6 @@
   by (forward_tac [rewrite_rule [Impl.inv1_def]
                                 (inv1 RS invariantE) RS conjunct1] 1);
   by (tac2 1);
-  by (arith_tac 1);
 
   (* 3 *)
   by (forward_tac [rewrite_rule [Impl.inv1_def] (inv1 RS invariantE)] 1);