diff options
Diffstat (limited to 'kvx/ConstpropOpproof.v')
| -rw-r--r-- | kvx/ConstpropOpproof.v | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/kvx/ConstpropOpproof.v b/kvx/ConstpropOpproof.v index ffd35bcc..f67b8a4e 100644 --- a/kvx/ConstpropOpproof.v +++ b/kvx/ConstpropOpproof.v @@ -19,6 +19,7 @@ Require Import Coqlib Compopts. Require Import Integers Floats Values Memory Globalenvs Events. Require Import Op Registers RTL ValueDomain. Require Import ConstpropOp. +Require Import Lia. Section STRENGTH_REDUCTION. @@ -336,7 +337,7 @@ Proof. Int.bit_solve. destruct (zlt i0 n0). replace (Int.testbit n i0) with (negb (Int.testbit Int.zero i0)). rewrite Int.bits_zero. cbn. rewrite andb_true_r. auto. - rewrite <- EQ. rewrite Int.bits_zero_ext by omega. rewrite zlt_true by auto. + rewrite <- EQ. rewrite Int.bits_zero_ext by lia. rewrite zlt_true by auto. rewrite Int.bits_not by auto. apply negb_involutive. rewrite H6 by auto. auto. econstructor; split; eauto. auto. |