diff options
| author | Yann Herklotz <git@yannherklotz.com> | 2021-09-17 17:06:28 +0100 |
|---|---|---|
| committer | Yann Herklotz <git@yannherklotz.com> | 2023-04-27 11:53:24 +0100 |
| commit | 9a3143dad1b119250d0553562a436f5f5f57269b (patch) | |
| tree | a3a874d262e7dec83f7575fd3f1a72b8342d10f6 /verilog/NeedOp.v | |
| parent | 01c2e94a38f91af008e21a7be998da2db34ade03 (diff) | |
| download | compcert-9a3143dad1b119250d0553562a436f5f5f57269b.tar.gz compcert-9a3143dad1b119250d0553562a436f5f5f57269b.zip | |
Replace omega by lia
Diffstat (limited to 'verilog/NeedOp.v')
| -rw-r--r-- | verilog/NeedOp.v | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/verilog/NeedOp.v b/verilog/NeedOp.v index d9a58fbb..775a23db 100644 --- a/verilog/NeedOp.v +++ b/verilog/NeedOp.v @@ -206,9 +206,9 @@ Proof. unfold needs_of_operation; intros; destruct op; try (eapply default_needs_of_operation_sound; eauto; fail); simpl in *; FuncInv; InvAgree; TrivialExists. - apply sign_ext_sound; auto. compute; auto. -- apply zero_ext_sound; auto. omega. +- apply zero_ext_sound; auto. lia. - apply sign_ext_sound; auto. compute; auto. -- apply zero_ext_sound; auto. omega. +- apply zero_ext_sound; auto. lia. - apply neg_sound; auto. - apply mul_sound; auto. - apply mul_sound; auto with na. @@ -246,10 +246,10 @@ Lemma operation_is_redundant_sound: vagree v arg1' nv. Proof. intros. destruct op; simpl in *; try discriminate; inv H1; FuncInv; subst. -- apply sign_ext_redundant_sound; auto. omega. -- apply zero_ext_redundant_sound; auto. omega. -- apply sign_ext_redundant_sound; auto. omega. -- apply zero_ext_redundant_sound; auto. omega. +- apply sign_ext_redundant_sound; auto. lia. +- apply zero_ext_redundant_sound; auto. lia. +- apply sign_ext_redundant_sound; auto. lia. +- apply zero_ext_redundant_sound; auto. lia. - apply andimm_redundant_sound; auto. - apply orimm_redundant_sound; auto. Qed. |