diff options
Diffstat (limited to 'common/Memdata.v')
-rw-r--r-- | common/Memdata.v | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/common/Memdata.v b/common/Memdata.v index 611a32bd..5f06d2c6 100644 --- a/common/Memdata.v +++ b/common/Memdata.v @@ -189,7 +189,8 @@ Opaque Byte.wordsize. rewrite inj_S. simpl. replace (Zsucc (Z_of_nat n) * 8) with (Z_of_nat n * 8 + 8) by omega. rewrite two_p_is_exp; try omega. - rewrite Zmod_recombine. rewrite IHn. rewrite Zplus_comm. reflexivity. + rewrite Zmod_recombine. rewrite IHn. rewrite Zplus_comm. + rewrite Byte.Z_mod_two_p_eq. reflexivity. apply two_p_gt_ZERO. omega. apply two_p_gt_ZERO. omega. Qed. |