diff options
author | 2014-09-08 16:19:39 +0200 | |
---|---|---|
committer | 2014-10-01 23:24:36 +0200 | |
commit | 183112fc6a5fbb7d1c6d60b9717cdb8aceda78ca (patch) | |
tree | 8ac0350e08c22893acbb3905e028aee18f86bb5b /theories/Numbers/Cyclic/DoubleCyclic/DoubleSqrt.v | |
parent | b9a6247ddc52082065b56f296c889c41167e0507 (diff) |
Simpl less (so that cbn will not simpl too much)
Diffstat (limited to 'theories/Numbers/Cyclic/DoubleCyclic/DoubleSqrt.v')
-rw-r--r-- | theories/Numbers/Cyclic/DoubleCyclic/DoubleSqrt.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Numbers/Cyclic/DoubleCyclic/DoubleSqrt.v b/theories/Numbers/Cyclic/DoubleCyclic/DoubleSqrt.v index 789436334..5ca332551 100644 --- a/theories/Numbers/Cyclic/DoubleCyclic/DoubleSqrt.v +++ b/theories/Numbers/Cyclic/DoubleCyclic/DoubleSqrt.v @@ -266,8 +266,8 @@ Section DoubleSqrt. if ww_is_even x then [[x]] mod 2 = 0 else [[x]] mod 2 = 1. clear spec_more_than_1_digit. intros x; case x; simpl ww_is_even. + reflexivity. simpl. - rewrite Zmod_small; auto with zarith. intros w1 w2; simpl. unfold base. rewrite Zplus_mod; auto with zarith. |