diff options
| author |  Jason Gross <jgross@mit.edu> | 2017-03-30 18:55:33 -0400 |
|---|---|---|
| committer | Jason Gross <jgross@mit.edu> | 2017-03-30 18:56:04 -0400 |
| commit | 686fcbced2b0fb0b35fa6ad5aa71dd6924aee459 (patch) | |
| tree | ce3f87d9a1a6f9e69517394f3443eef79d7d5087 /src | |
| parent | 598ae72e8653a20cfa3e1ded0d6e1aedf6323f18 (diff) | |
Add a comment explaining bounds_exp
Diffstat (limited to 'src')
| -rw-r--r-- | src/Specific/IntegrationTest.v | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Specific/IntegrationTest.v b/src/Specific/IntegrationTest.v index 74d6ba265..39f34a311 100644 --- a/src/Specific/IntegrationTest.v +++ b/src/Specific/IntegrationTest.v @@ -28,6 +28,10 @@ Section BoundedField25p5. Let length_lw := Eval compute in List.length limb_widths. Local Notation b_of exp := {| lower := 0 ; upper := 2^exp + 2^(exp-3) |}%Z (only parsing). (* max is [(0, 2^(exp+2) + 2^exp + 2^(exp-1) + 2^(exp-3) + 2^(exp-4) + 2^(exp-5) + 2^(exp-6) + 2^(exp-10) + 2^(exp-12) + 2^(exp-13) + 2^(exp-14) + 2^(exp-15) + 2^(exp-17) + 2^(exp-23) + 2^(exp-24))%Z] *) + (* The definition [bounds_exp] is a tuple-version of the + limb-widths, which are the [exp] argument in [b_of] above, i.e., + the approximate base-2 exponent of the bounds on the limb in that + position. *) Let bounds_exp : Tuple.tuple Z length_lw := Eval compute in Tuple.from_list length_lw limb_widths eq_refl. |