author | nipkow |
Thu, 07 Jul 2005 12:42:21 +0200 | |
changeset 16734 | 2c76db916c51 |
parent 16733 | 236dfafbeb63 |
child 16735 | 008d089822e3 |
--- 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);