diff options
author | 2017-11-10 13:19:57 -0500 | |
---|---|---|
committer | 2017-11-12 15:01:59 -0500 | |
commit | 795d24349b9aca1d9732c7b7fcaa505f24fa4bc6 (patch) | |
tree | f517d6c4e83f42e72a303e06567f779c0250fc2e /src/Specific/montgomery32_2e205m45x2e198m1 | |
parent | 7ad53a35ed68777cd21226998a88494e1d97c63e (diff) |
new autogenerated files
Diffstat (limited to 'src/Specific/montgomery32_2e205m45x2e198m1')
23 files changed, 0 insertions, 648 deletions
diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/CurveParameters.v b/src/Specific/montgomery32_2e205m45x2e198m1/CurveParameters.v deleted file mode 100644 index d3ff2f8a7..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/CurveParameters.v +++ /dev/null @@ -1,39 +0,0 @@ -Require Import Crypto.Specific.Framework.RawCurveParameters. -Require Import Crypto.Util.LetIn. - -(*** -Modulus : 2^205 - 45*2^198 - 1 -Base: 32 -***) - -Definition curve : CurveParameters := - {| - sz := 7%nat; - base := 32; - bitwidth := 32; - s := 2^205; - c := [(1, 1); (45, 2^198)]; - carry_chains := None; - - a24 := None; - coef_div_modulus := None; - - goldilocks := None; - karatsuba := None; - montgomery := true; - freeze := Some false; - ladderstep := false; - - mul_code := None; - - square_code := None; - - upper_bound_of_exponent_loose := None; - upper_bound_of_exponent_tight := None; - allowable_bit_widths := None; - freeze_extra_allowable_bit_widths := None; - modinv_fuel := None - |}. - -Ltac extra_prove_mul_eq _ := idtac. -Ltac extra_prove_square_eq _ := idtac. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/Synthesis.v b/src/Specific/montgomery32_2e205m45x2e198m1/Synthesis.v deleted file mode 100644 index cbcef2a10..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/Synthesis.v +++ /dev/null @@ -1,9 +0,0 @@ -Require Import Crypto.Specific.Framework.SynthesisFramework. -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.CurveParameters. - -Module P <: PrePackage. - Definition package : Tag.Context. - Proof. make_Synthesis_package curve extra_prove_mul_eq extra_prove_square_eq. Defined. -End P. - -Module Export S := PackageSynthesis P. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/compiler.sh b/src/Specific/montgomery32_2e205m45x2e198m1/compiler.sh deleted file mode 100755 index e1b5bf36f..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/compiler.sh +++ /dev/null @@ -1,4 +0,0 @@ -#!/bin/sh -set -eu - -clang -fbracket-depth=999999 -march=native -mtune=native -std=gnu11 -O3 -flto -fuse-ld=lld -fomit-frame-pointer -fwrapv -Wno-attributes -fno-strict-aliasing -Da24_hex='0x3039' -Da24_val='12345' -Da_minus_two_over_four_array='{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x39}' -Dbitwidth='32' -Dlimb_weight_gaps_array='{32,32,32,32,32,32,32}' -Dmodulus_array='{0x14,0xbf,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff}' -Dmodulus_bytes_val='26' -Dmodulus_limbs='7' -Dq_mpz='(1_mpz<<205) - 45*(1_mpz<<198) - 1' "$@" diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/compilerxx.sh b/src/Specific/montgomery32_2e205m45x2e198m1/compilerxx.sh deleted file mode 100755 index 857cfccbc..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/compilerxx.sh +++ /dev/null @@ -1,4 +0,0 @@ -#!/bin/sh -set -eu - -clang++ -fbracket-depth=999999 -march=native -mtune=native -std=gnu++11 -O3 -flto -fuse-ld=lld -fomit-frame-pointer -fwrapv -Wno-attributes -fno-strict-aliasing -Da24_hex='0x3039' -Da24_val='12345' -Da_minus_two_over_four_array='{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x39}' -Dbitwidth='32' -Dlimb_weight_gaps_array='{32,32,32,32,32,32,32}' -Dmodulus_array='{0x14,0xbf,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff}' -Dmodulus_bytes_val='26' -Dmodulus_limbs='7' -Dq_mpz='(1_mpz<<205) - 45*(1_mpz<<198) - 1' "$@" diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/feadd.c b/src/Specific/montgomery32_2e205m45x2e198m1/feadd.c deleted file mode 100644 index b879f8a35..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/feadd.c +++ /dev/null @@ -1,46 +0,0 @@ -static void feadd(uint32_t out[7], const uint32_t in1[7], const uint32_t in2[7]) { - { const uint32_t x14 = in1[6]; - { const uint32_t x15 = in1[5]; - { const uint32_t x13 = in1[4]; - { const uint32_t x11 = in1[3]; - { const uint32_t x9 = in1[2]; - { const uint32_t x7 = in1[1]; - { const uint32_t x5 = in1[0]; - { const uint32_t x26 = in2[6]; - { const uint32_t x27 = in2[5]; - { const uint32_t x25 = in2[4]; - { const uint32_t x23 = in2[3]; - { const uint32_t x21 = in2[2]; - { const uint32_t x19 = in2[1]; - { const uint32_t x17 = in2[0]; - { uint32_t x29; uint8_t x30 = _addcarryx_u32(0x0, x5, x17, &x29); - { uint32_t x32; uint8_t x33 = _addcarryx_u32(x30, x7, x19, &x32); - { uint32_t x35; uint8_t x36 = _addcarryx_u32(x33, x9, x21, &x35); - { uint32_t x38; uint8_t x39 = _addcarryx_u32(x36, x11, x23, &x38); - { uint32_t x41; uint8_t x42 = _addcarryx_u32(x39, x13, x25, &x41); - { uint32_t x44; uint8_t x45 = _addcarryx_u32(x42, x15, x27, &x44); - { uint32_t x47; uint8_t x48 = _addcarryx_u32(x45, x14, x26, &x47); - { uint32_t x50; uint8_t x51 = _subborrow_u32(0x0, x29, 0xffffffff, &x50); - { uint32_t x53; uint8_t x54 = _subborrow_u32(x51, x32, 0xffffffff, &x53); - { uint32_t x56; uint8_t x57 = _subborrow_u32(x54, x35, 0xffffffff, &x56); - { uint32_t x59; uint8_t x60 = _subborrow_u32(x57, x38, 0xffffffff, &x59); - { uint32_t x62; uint8_t x63 = _subborrow_u32(x60, x41, 0xffffffff, &x62); - { uint32_t x65; uint8_t x66 = _subborrow_u32(x63, x44, 0xffffffff, &x65); - { uint32_t x68; uint8_t x69 = _subborrow_u32(x66, x47, 0x14bf, &x68); - { uint32_t _; uint8_t x72 = _subborrow_u32(x69, x48, 0x0, &_); - { uint32_t x73 = cmovznz32(x72, x68, x47); - { uint32_t x74 = cmovznz32(x72, x65, x44); - { uint32_t x75 = cmovznz32(x72, x62, x41); - { uint32_t x76 = cmovznz32(x72, x59, x38); - { uint32_t x77 = cmovznz32(x72, x56, x35); - { uint32_t x78 = cmovznz32(x72, x53, x32); - { uint32_t x79 = cmovznz32(x72, x50, x29); - out[0] = x79; - out[1] = x78; - out[2] = x77; - out[3] = x76; - out[4] = x75; - out[5] = x74; - out[6] = x73; - }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}} -} diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/feadd.v b/src/Specific/montgomery32_2e205m45x2e198m1/feadd.v deleted file mode 100644 index d86390d7e..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/feadd.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.Synthesis. - -(* TODO : change this to field once field isomorphism happens *) -Definition add : - { add : feBW_small -> feBW_small -> feBW_small - | forall a b, phiM_small (add a b) = F.add (phiM_small a) (phiM_small b) }. -Proof. - Set Ltac Profiling. - Time synthesize_add (). - Show Ltac Profile. -Time Defined. - -Print Assumptions add. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/feaddDisplay.log b/src/Specific/montgomery32_2e205m45x2e198m1/feaddDisplay.log deleted file mode 100644 index c0d73efa6..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/feaddDisplay.log +++ /dev/null @@ -1,29 +0,0 @@ -λ x x0 : word32 * word32 * word32 * word32 * word32 * word32 * word32, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x14, x15, x13, x11, x9, x7, x5, (x26, x27, x25, x23, x21, x19, x17))%core, - uint32_t x29, uint8_t x30 = addcarryx_u32(0x0, x5, x17); - uint32_t x32, uint8_t x33 = addcarryx_u32(x30, x7, x19); - uint32_t x35, uint8_t x36 = addcarryx_u32(x33, x9, x21); - uint32_t x38, uint8_t x39 = addcarryx_u32(x36, x11, x23); - uint32_t x41, uint8_t x42 = addcarryx_u32(x39, x13, x25); - uint32_t x44, uint8_t x45 = addcarryx_u32(x42, x15, x27); - uint32_t x47, uint8_t x48 = addcarryx_u32(x45, x14, x26); - uint32_t x50, uint8_t x51 = subborrow_u32(0x0, x29, 0xffffffff); - uint32_t x53, uint8_t x54 = subborrow_u32(x51, x32, 0xffffffff); - uint32_t x56, uint8_t x57 = subborrow_u32(x54, x35, 0xffffffff); - uint32_t x59, uint8_t x60 = subborrow_u32(x57, x38, 0xffffffff); - uint32_t x62, uint8_t x63 = subborrow_u32(x60, x41, 0xffffffff); - uint32_t x65, uint8_t x66 = subborrow_u32(x63, x44, 0xffffffff); - uint32_t x68, uint8_t x69 = subborrow_u32(x66, x47, 0x14bf); - uint32_t _, uint8_t x72 = subborrow_u32(x69, x48, 0x0); - uint32_t x73 = cmovznz32(x72, x68, x47); - uint32_t x74 = cmovznz32(x72, x65, x44); - uint32_t x75 = cmovznz32(x72, x62, x41); - uint32_t x76 = cmovznz32(x72, x59, x38); - uint32_t x77 = cmovznz32(x72, x56, x35); - uint32_t x78 = cmovznz32(x72, x53, x32); - uint32_t x79 = cmovznz32(x72, x50, x29); - return (x73, x74, x75, x76, x77, x78, x79)) -(x, x0)%core - : word32 * word32 * word32 * word32 * word32 * word32 * word32 → word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType (uint32_t * uint32_t * uint32_t * uint32_t * uint32_t * uint32_t * uint32_t) diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/feaddDisplay.v b/src/Specific/montgomery32_2e205m45x2e198m1/feaddDisplay.v deleted file mode 100644 index 4c141eaa3..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/feaddDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.feadd. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display add. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/femul.v b/src/Specific/montgomery32_2e205m45x2e198m1/femul.v deleted file mode 100644 index eb03610f7..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/femul.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.Synthesis. - -(* TODO : change this to field once field isomorphism happens *) -Definition mul : - { mul : feBW_small -> feBW_small -> feBW_small - | forall a b, phiM_small (mul a b) = F.mul (phiM_small a) (phiM_small b) }. -Proof. - Set Ltac Profiling. - Time synthesize_mul (). - Show Ltac Profile. -Time Defined. - -Print Assumptions mul. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/femulDisplay.log b/src/Specific/montgomery32_2e205m45x2e198m1/femulDisplay.log deleted file mode 100644 index 22a0be41c..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/femulDisplay.log +++ /dev/null @@ -1,328 +0,0 @@ -λ x x0 : word32 * word32 * word32 * word32 * word32 * word32 * word32, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x14, x15, x13, x11, x9, x7, x5, (x26, x27, x25, x23, x21, x19, x17))%core, - uint32_t x29, uint32_t x30 = mulx_u32(x5, x17); - uint32_t x32, uint32_t x33 = mulx_u32(x5, x19); - uint32_t x35, uint32_t x36 = mulx_u32(x5, x21); - uint32_t x38, uint32_t x39 = mulx_u32(x5, x23); - uint32_t x41, uint32_t x42 = mulx_u32(x5, x25); - uint32_t x44, uint32_t x45 = mulx_u32(x5, x27); - uint32_t x47, uint32_t x48 = mulx_u32(x5, x26); - uint32_t x50, uint8_t x51 = addcarryx_u32(0x0, x30, x32); - uint32_t x53, uint8_t x54 = addcarryx_u32(x51, x33, x35); - uint32_t x56, uint8_t x57 = addcarryx_u32(x54, x36, x38); - uint32_t x59, uint8_t x60 = addcarryx_u32(x57, x39, x41); - uint32_t x62, uint8_t x63 = addcarryx_u32(x60, x42, x44); - uint32_t x65, uint8_t x66 = addcarryx_u32(x63, x45, x47); - uint32_t x68, uint8_t _ = addcarryx_u32(0x0, x66, x48); - uint32_t x71, uint32_t x72 = mulx_u32(x29, 0xffffffff); - uint32_t x74, uint32_t x75 = mulx_u32(x29, 0xffffffff); - uint32_t x77, uint32_t x78 = mulx_u32(x29, 0xffffffff); - uint32_t x80, uint32_t x81 = mulx_u32(x29, 0xffffffff); - uint32_t x83, uint32_t x84 = mulx_u32(x29, 0xffffffff); - uint32_t x86, uint32_t x87 = mulx_u32(x29, 0xffffffff); - uint32_t x89, uint32_t x90 = mulx_u32(x29, 0x14bf); - uint32_t x92, uint8_t x93 = addcarryx_u32(0x0, x72, x74); - uint32_t x95, uint8_t x96 = addcarryx_u32(x93, x75, x77); - uint32_t x98, uint8_t x99 = addcarryx_u32(x96, x78, x80); - uint32_t x101, uint8_t x102 = addcarryx_u32(x99, x81, x83); - uint32_t x104, uint8_t x105 = addcarryx_u32(x102, x84, x86); - uint32_t x107, uint8_t x108 = addcarryx_u32(x105, x87, x89); - uint32_t x110, uint8_t _ = addcarryx_u32(0x0, x108, x90); - uint32_t _, uint8_t x114 = addcarryx_u32(0x0, x29, x71); - uint32_t x116, uint8_t x117 = addcarryx_u32(x114, x50, x92); - uint32_t x119, uint8_t x120 = addcarryx_u32(x117, x53, x95); - uint32_t x122, uint8_t x123 = addcarryx_u32(x120, x56, x98); - uint32_t x125, uint8_t x126 = addcarryx_u32(x123, x59, x101); - uint32_t x128, uint8_t x129 = addcarryx_u32(x126, x62, x104); - uint32_t x131, uint8_t x132 = addcarryx_u32(x129, x65, x107); - uint32_t x134, uint8_t x135 = addcarryx_u32(x132, x68, x110); - uint32_t x137, uint32_t x138 = mulx_u32(x7, x17); - uint32_t x140, uint32_t x141 = mulx_u32(x7, x19); - uint32_t x143, uint32_t x144 = mulx_u32(x7, x21); - uint32_t x146, uint32_t x147 = mulx_u32(x7, x23); - uint32_t x149, uint32_t x150 = mulx_u32(x7, x25); - uint32_t x152, uint32_t x153 = mulx_u32(x7, x27); - uint32_t x155, uint32_t x156 = mulx_u32(x7, x26); - uint32_t x158, uint8_t x159 = addcarryx_u32(0x0, x138, x140); - uint32_t x161, uint8_t x162 = addcarryx_u32(x159, x141, x143); - uint32_t x164, uint8_t x165 = addcarryx_u32(x162, x144, x146); - uint32_t x167, uint8_t x168 = addcarryx_u32(x165, x147, x149); - uint32_t x170, uint8_t x171 = addcarryx_u32(x168, x150, x152); - uint32_t x173, uint8_t x174 = addcarryx_u32(x171, x153, x155); - uint32_t x176, uint8_t _ = addcarryx_u32(0x0, x174, x156); - uint32_t x179, uint8_t x180 = addcarryx_u32(0x0, x116, x137); - uint32_t x182, uint8_t x183 = addcarryx_u32(x180, x119, x158); - uint32_t x185, uint8_t x186 = addcarryx_u32(x183, x122, x161); - uint32_t x188, uint8_t x189 = addcarryx_u32(x186, x125, x164); - uint32_t x191, uint8_t x192 = addcarryx_u32(x189, x128, x167); - uint32_t x194, uint8_t x195 = addcarryx_u32(x192, x131, x170); - uint32_t x197, uint8_t x198 = addcarryx_u32(x195, x134, x173); - uint32_t x200, uint8_t x201 = addcarryx_u32(x198, x135, x176); - uint32_t x203, uint32_t x204 = mulx_u32(x179, 0xffffffff); - uint32_t x206, uint32_t x207 = mulx_u32(x179, 0xffffffff); - uint32_t x209, uint32_t x210 = mulx_u32(x179, 0xffffffff); - uint32_t x212, uint32_t x213 = mulx_u32(x179, 0xffffffff); - uint32_t x215, uint32_t x216 = mulx_u32(x179, 0xffffffff); - uint32_t x218, uint32_t x219 = mulx_u32(x179, 0xffffffff); - uint32_t x221, uint32_t x222 = mulx_u32(x179, 0x14bf); - uint32_t x224, uint8_t x225 = addcarryx_u32(0x0, x204, x206); - uint32_t x227, uint8_t x228 = addcarryx_u32(x225, x207, x209); - uint32_t x230, uint8_t x231 = addcarryx_u32(x228, x210, x212); - uint32_t x233, uint8_t x234 = addcarryx_u32(x231, x213, x215); - uint32_t x236, uint8_t x237 = addcarryx_u32(x234, x216, x218); - uint32_t x239, uint8_t x240 = addcarryx_u32(x237, x219, x221); - uint32_t x242, uint8_t _ = addcarryx_u32(0x0, x240, x222); - uint32_t _, uint8_t x246 = addcarryx_u32(0x0, x179, x203); - uint32_t x248, uint8_t x249 = addcarryx_u32(x246, x182, x224); - uint32_t x251, uint8_t x252 = addcarryx_u32(x249, x185, x227); - uint32_t x254, uint8_t x255 = addcarryx_u32(x252, x188, x230); - uint32_t x257, uint8_t x258 = addcarryx_u32(x255, x191, x233); - uint32_t x260, uint8_t x261 = addcarryx_u32(x258, x194, x236); - uint32_t x263, uint8_t x264 = addcarryx_u32(x261, x197, x239); - uint32_t x266, uint8_t x267 = addcarryx_u32(x264, x200, x242); - uint8_t x268 = (x267 + x201); - uint32_t x270, uint32_t x271 = mulx_u32(x9, x17); - uint32_t x273, uint32_t x274 = mulx_u32(x9, x19); - uint32_t x276, uint32_t x277 = mulx_u32(x9, x21); - uint32_t x279, uint32_t x280 = mulx_u32(x9, x23); - uint32_t x282, uint32_t x283 = mulx_u32(x9, x25); - uint32_t x285, uint32_t x286 = mulx_u32(x9, x27); - uint32_t x288, uint32_t x289 = mulx_u32(x9, x26); - uint32_t x291, uint8_t x292 = addcarryx_u32(0x0, x271, x273); - uint32_t x294, uint8_t x295 = addcarryx_u32(x292, x274, x276); - uint32_t x297, uint8_t x298 = addcarryx_u32(x295, x277, x279); - uint32_t x300, uint8_t x301 = addcarryx_u32(x298, x280, x282); - uint32_t x303, uint8_t x304 = addcarryx_u32(x301, x283, x285); - uint32_t x306, uint8_t x307 = addcarryx_u32(x304, x286, x288); - uint32_t x309, uint8_t _ = addcarryx_u32(0x0, x307, x289); - uint32_t x312, uint8_t x313 = addcarryx_u32(0x0, x248, x270); - uint32_t x315, uint8_t x316 = addcarryx_u32(x313, x251, x291); - uint32_t x318, uint8_t x319 = addcarryx_u32(x316, x254, x294); - uint32_t x321, uint8_t x322 = addcarryx_u32(x319, x257, x297); - uint32_t x324, uint8_t x325 = addcarryx_u32(x322, x260, x300); - uint32_t x327, uint8_t x328 = addcarryx_u32(x325, x263, x303); - uint32_t x330, uint8_t x331 = addcarryx_u32(x328, x266, x306); - uint32_t x333, uint8_t x334 = addcarryx_u32(x331, x268, x309); - uint32_t x336, uint32_t x337 = mulx_u32(x312, 0xffffffff); - uint32_t x339, uint32_t x340 = mulx_u32(x312, 0xffffffff); - uint32_t x342, uint32_t x343 = mulx_u32(x312, 0xffffffff); - uint32_t x345, uint32_t x346 = mulx_u32(x312, 0xffffffff); - uint32_t x348, uint32_t x349 = mulx_u32(x312, 0xffffffff); - uint32_t x351, uint32_t x352 = mulx_u32(x312, 0xffffffff); - uint32_t x354, uint32_t x355 = mulx_u32(x312, 0x14bf); - uint32_t x357, uint8_t x358 = addcarryx_u32(0x0, x337, x339); - uint32_t x360, uint8_t x361 = addcarryx_u32(x358, x340, x342); - uint32_t x363, uint8_t x364 = addcarryx_u32(x361, x343, x345); - uint32_t x366, uint8_t x367 = addcarryx_u32(x364, x346, x348); - uint32_t x369, uint8_t x370 = addcarryx_u32(x367, x349, x351); - uint32_t x372, uint8_t x373 = addcarryx_u32(x370, x352, x354); - uint32_t x375, uint8_t _ = addcarryx_u32(0x0, x373, x355); - uint32_t _, uint8_t x379 = addcarryx_u32(0x0, x312, x336); - uint32_t x381, uint8_t x382 = addcarryx_u32(x379, x315, x357); - uint32_t x384, uint8_t x385 = addcarryx_u32(x382, x318, x360); - uint32_t x387, uint8_t x388 = addcarryx_u32(x385, x321, x363); - uint32_t x390, uint8_t x391 = addcarryx_u32(x388, x324, x366); - uint32_t x393, uint8_t x394 = addcarryx_u32(x391, x327, x369); - uint32_t x396, uint8_t x397 = addcarryx_u32(x394, x330, x372); - uint32_t x399, uint8_t x400 = addcarryx_u32(x397, x333, x375); - uint8_t x401 = (x400 + x334); - uint32_t x403, uint32_t x404 = mulx_u32(x11, x17); - uint32_t x406, uint32_t x407 = mulx_u32(x11, x19); - uint32_t x409, uint32_t x410 = mulx_u32(x11, x21); - uint32_t x412, uint32_t x413 = mulx_u32(x11, x23); - uint32_t x415, uint32_t x416 = mulx_u32(x11, x25); - uint32_t x418, uint32_t x419 = mulx_u32(x11, x27); - uint32_t x421, uint32_t x422 = mulx_u32(x11, x26); - uint32_t x424, uint8_t x425 = addcarryx_u32(0x0, x404, x406); - uint32_t x427, uint8_t x428 = addcarryx_u32(x425, x407, x409); - uint32_t x430, uint8_t x431 = addcarryx_u32(x428, x410, x412); - uint32_t x433, uint8_t x434 = addcarryx_u32(x431, x413, x415); - uint32_t x436, uint8_t x437 = addcarryx_u32(x434, x416, x418); - uint32_t x439, uint8_t x440 = addcarryx_u32(x437, x419, x421); - uint32_t x442, uint8_t _ = addcarryx_u32(0x0, x440, x422); - uint32_t x445, uint8_t x446 = addcarryx_u32(0x0, x381, x403); - uint32_t x448, uint8_t x449 = addcarryx_u32(x446, x384, x424); - uint32_t x451, uint8_t x452 = addcarryx_u32(x449, x387, x427); - uint32_t x454, uint8_t x455 = addcarryx_u32(x452, x390, x430); - uint32_t x457, uint8_t x458 = addcarryx_u32(x455, x393, x433); - uint32_t x460, uint8_t x461 = addcarryx_u32(x458, x396, x436); - uint32_t x463, uint8_t x464 = addcarryx_u32(x461, x399, x439); - uint32_t x466, uint8_t x467 = addcarryx_u32(x464, x401, x442); - uint32_t x469, uint32_t x470 = mulx_u32(x445, 0xffffffff); - uint32_t x472, uint32_t x473 = mulx_u32(x445, 0xffffffff); - uint32_t x475, uint32_t x476 = mulx_u32(x445, 0xffffffff); - uint32_t x478, uint32_t x479 = mulx_u32(x445, 0xffffffff); - uint32_t x481, uint32_t x482 = mulx_u32(x445, 0xffffffff); - uint32_t x484, uint32_t x485 = mulx_u32(x445, 0xffffffff); - uint32_t x487, uint32_t x488 = mulx_u32(x445, 0x14bf); - uint32_t x490, uint8_t x491 = addcarryx_u32(0x0, x470, x472); - uint32_t x493, uint8_t x494 = addcarryx_u32(x491, x473, x475); - uint32_t x496, uint8_t x497 = addcarryx_u32(x494, x476, x478); - uint32_t x499, uint8_t x500 = addcarryx_u32(x497, x479, x481); - uint32_t x502, uint8_t x503 = addcarryx_u32(x500, x482, x484); - uint32_t x505, uint8_t x506 = addcarryx_u32(x503, x485, x487); - uint32_t x508, uint8_t _ = addcarryx_u32(0x0, x506, x488); - uint32_t _, uint8_t x512 = addcarryx_u32(0x0, x445, x469); - uint32_t x514, uint8_t x515 = addcarryx_u32(x512, x448, x490); - uint32_t x517, uint8_t x518 = addcarryx_u32(x515, x451, x493); - uint32_t x520, uint8_t x521 = addcarryx_u32(x518, x454, x496); - uint32_t x523, uint8_t x524 = addcarryx_u32(x521, x457, x499); - uint32_t x526, uint8_t x527 = addcarryx_u32(x524, x460, x502); - uint32_t x529, uint8_t x530 = addcarryx_u32(x527, x463, x505); - uint32_t x532, uint8_t x533 = addcarryx_u32(x530, x466, x508); - uint8_t x534 = (x533 + x467); - uint32_t x536, uint32_t x537 = mulx_u32(x13, x17); - uint32_t x539, uint32_t x540 = mulx_u32(x13, x19); - uint32_t x542, uint32_t x543 = mulx_u32(x13, x21); - uint32_t x545, uint32_t x546 = mulx_u32(x13, x23); - uint32_t x548, uint32_t x549 = mulx_u32(x13, x25); - uint32_t x551, uint32_t x552 = mulx_u32(x13, x27); - uint32_t x554, uint32_t x555 = mulx_u32(x13, x26); - uint32_t x557, uint8_t x558 = addcarryx_u32(0x0, x537, x539); - uint32_t x560, uint8_t x561 = addcarryx_u32(x558, x540, x542); - uint32_t x563, uint8_t x564 = addcarryx_u32(x561, x543, x545); - uint32_t x566, uint8_t x567 = addcarryx_u32(x564, x546, x548); - uint32_t x569, uint8_t x570 = addcarryx_u32(x567, x549, x551); - uint32_t x572, uint8_t x573 = addcarryx_u32(x570, x552, x554); - uint32_t x575, uint8_t _ = addcarryx_u32(0x0, x573, x555); - uint32_t x578, uint8_t x579 = addcarryx_u32(0x0, x514, x536); - uint32_t x581, uint8_t x582 = addcarryx_u32(x579, x517, x557); - uint32_t x584, uint8_t x585 = addcarryx_u32(x582, x520, x560); - uint32_t x587, uint8_t x588 = addcarryx_u32(x585, x523, x563); - uint32_t x590, uint8_t x591 = addcarryx_u32(x588, x526, x566); - uint32_t x593, uint8_t x594 = addcarryx_u32(x591, x529, x569); - uint32_t x596, uint8_t x597 = addcarryx_u32(x594, x532, x572); - uint32_t x599, uint8_t x600 = addcarryx_u32(x597, x534, x575); - uint32_t x602, uint32_t x603 = mulx_u32(x578, 0xffffffff); - uint32_t x605, uint32_t x606 = mulx_u32(x578, 0xffffffff); - uint32_t x608, uint32_t x609 = mulx_u32(x578, 0xffffffff); - uint32_t x611, uint32_t x612 = mulx_u32(x578, 0xffffffff); - uint32_t x614, uint32_t x615 = mulx_u32(x578, 0xffffffff); - uint32_t x617, uint32_t x618 = mulx_u32(x578, 0xffffffff); - uint32_t x620, uint32_t x621 = mulx_u32(x578, 0x14bf); - uint32_t x623, uint8_t x624 = addcarryx_u32(0x0, x603, x605); - uint32_t x626, uint8_t x627 = addcarryx_u32(x624, x606, x608); - uint32_t x629, uint8_t x630 = addcarryx_u32(x627, x609, x611); - uint32_t x632, uint8_t x633 = addcarryx_u32(x630, x612, x614); - uint32_t x635, uint8_t x636 = addcarryx_u32(x633, x615, x617); - uint32_t x638, uint8_t x639 = addcarryx_u32(x636, x618, x620); - uint32_t x641, uint8_t _ = addcarryx_u32(0x0, x639, x621); - uint32_t _, uint8_t x645 = addcarryx_u32(0x0, x578, x602); - uint32_t x647, uint8_t x648 = addcarryx_u32(x645, x581, x623); - uint32_t x650, uint8_t x651 = addcarryx_u32(x648, x584, x626); - uint32_t x653, uint8_t x654 = addcarryx_u32(x651, x587, x629); - uint32_t x656, uint8_t x657 = addcarryx_u32(x654, x590, x632); - uint32_t x659, uint8_t x660 = addcarryx_u32(x657, x593, x635); - uint32_t x662, uint8_t x663 = addcarryx_u32(x660, x596, x638); - uint32_t x665, uint8_t x666 = addcarryx_u32(x663, x599, x641); - uint8_t x667 = (x666 + x600); - uint32_t x669, uint32_t x670 = mulx_u32(x15, x17); - uint32_t x672, uint32_t x673 = mulx_u32(x15, x19); - uint32_t x675, uint32_t x676 = mulx_u32(x15, x21); - uint32_t x678, uint32_t x679 = mulx_u32(x15, x23); - uint32_t x681, uint32_t x682 = mulx_u32(x15, x25); - uint32_t x684, uint32_t x685 = mulx_u32(x15, x27); - uint32_t x687, uint32_t x688 = mulx_u32(x15, x26); - uint32_t x690, uint8_t x691 = addcarryx_u32(0x0, x670, x672); - uint32_t x693, uint8_t x694 = addcarryx_u32(x691, x673, x675); - uint32_t x696, uint8_t x697 = addcarryx_u32(x694, x676, x678); - uint32_t x699, uint8_t x700 = addcarryx_u32(x697, x679, x681); - uint32_t x702, uint8_t x703 = addcarryx_u32(x700, x682, x684); - uint32_t x705, uint8_t x706 = addcarryx_u32(x703, x685, x687); - uint32_t x708, uint8_t _ = addcarryx_u32(0x0, x706, x688); - uint32_t x711, uint8_t x712 = addcarryx_u32(0x0, x647, x669); - uint32_t x714, uint8_t x715 = addcarryx_u32(x712, x650, x690); - uint32_t x717, uint8_t x718 = addcarryx_u32(x715, x653, x693); - uint32_t x720, uint8_t x721 = addcarryx_u32(x718, x656, x696); - uint32_t x723, uint8_t x724 = addcarryx_u32(x721, x659, x699); - uint32_t x726, uint8_t x727 = addcarryx_u32(x724, x662, x702); - uint32_t x729, uint8_t x730 = addcarryx_u32(x727, x665, x705); - uint32_t x732, uint8_t x733 = addcarryx_u32(x730, x667, x708); - uint32_t x735, uint32_t x736 = mulx_u32(x711, 0xffffffff); - uint32_t x738, uint32_t x739 = mulx_u32(x711, 0xffffffff); - uint32_t x741, uint32_t x742 = mulx_u32(x711, 0xffffffff); - uint32_t x744, uint32_t x745 = mulx_u32(x711, 0xffffffff); - uint32_t x747, uint32_t x748 = mulx_u32(x711, 0xffffffff); - uint32_t x750, uint32_t x751 = mulx_u32(x711, 0xffffffff); - uint32_t x753, uint32_t x754 = mulx_u32(x711, 0x14bf); - uint32_t x756, uint8_t x757 = addcarryx_u32(0x0, x736, x738); - uint32_t x759, uint8_t x760 = addcarryx_u32(x757, x739, x741); - uint32_t x762, uint8_t x763 = addcarryx_u32(x760, x742, x744); - uint32_t x765, uint8_t x766 = addcarryx_u32(x763, x745, x747); - uint32_t x768, uint8_t x769 = addcarryx_u32(x766, x748, x750); - uint32_t x771, uint8_t x772 = addcarryx_u32(x769, x751, x753); - uint32_t x774, uint8_t _ = addcarryx_u32(0x0, x772, x754); - uint32_t _, uint8_t x778 = addcarryx_u32(0x0, x711, x735); - uint32_t x780, uint8_t x781 = addcarryx_u32(x778, x714, x756); - uint32_t x783, uint8_t x784 = addcarryx_u32(x781, x717, x759); - uint32_t x786, uint8_t x787 = addcarryx_u32(x784, x720, x762); - uint32_t x789, uint8_t x790 = addcarryx_u32(x787, x723, x765); - uint32_t x792, uint8_t x793 = addcarryx_u32(x790, x726, x768); - uint32_t x795, uint8_t x796 = addcarryx_u32(x793, x729, x771); - uint32_t x798, uint8_t x799 = addcarryx_u32(x796, x732, x774); - uint8_t x800 = (x799 + x733); - uint32_t x802, uint32_t x803 = mulx_u32(x14, x17); - uint32_t x805, uint32_t x806 = mulx_u32(x14, x19); - uint32_t x808, uint32_t x809 = mulx_u32(x14, x21); - uint32_t x811, uint32_t x812 = mulx_u32(x14, x23); - uint32_t x814, uint32_t x815 = mulx_u32(x14, x25); - uint32_t x817, uint32_t x818 = mulx_u32(x14, x27); - uint32_t x820, uint32_t x821 = mulx_u32(x14, x26); - uint32_t x823, uint8_t x824 = addcarryx_u32(0x0, x803, x805); - uint32_t x826, uint8_t x827 = addcarryx_u32(x824, x806, x808); - uint32_t x829, uint8_t x830 = addcarryx_u32(x827, x809, x811); - uint32_t x832, uint8_t x833 = addcarryx_u32(x830, x812, x814); - uint32_t x835, uint8_t x836 = addcarryx_u32(x833, x815, x817); - uint32_t x838, uint8_t x839 = addcarryx_u32(x836, x818, x820); - uint32_t x841, uint8_t _ = addcarryx_u32(0x0, x839, x821); - uint32_t x844, uint8_t x845 = addcarryx_u32(0x0, x780, x802); - uint32_t x847, uint8_t x848 = addcarryx_u32(x845, x783, x823); - uint32_t x850, uint8_t x851 = addcarryx_u32(x848, x786, x826); - uint32_t x853, uint8_t x854 = addcarryx_u32(x851, x789, x829); - uint32_t x856, uint8_t x857 = addcarryx_u32(x854, x792, x832); - uint32_t x859, uint8_t x860 = addcarryx_u32(x857, x795, x835); - uint32_t x862, uint8_t x863 = addcarryx_u32(x860, x798, x838); - uint32_t x865, uint8_t x866 = addcarryx_u32(x863, x800, x841); - uint32_t x868, uint32_t x869 = mulx_u32(x844, 0xffffffff); - uint32_t x871, uint32_t x872 = mulx_u32(x844, 0xffffffff); - uint32_t x874, uint32_t x875 = mulx_u32(x844, 0xffffffff); - uint32_t x877, uint32_t x878 = mulx_u32(x844, 0xffffffff); - uint32_t x880, uint32_t x881 = mulx_u32(x844, 0xffffffff); - uint32_t x883, uint32_t x884 = mulx_u32(x844, 0xffffffff); - uint32_t x886, uint32_t x887 = mulx_u32(x844, 0x14bf); - uint32_t x889, uint8_t x890 = addcarryx_u32(0x0, x869, x871); - uint32_t x892, uint8_t x893 = addcarryx_u32(x890, x872, x874); - uint32_t x895, uint8_t x896 = addcarryx_u32(x893, x875, x877); - uint32_t x898, uint8_t x899 = addcarryx_u32(x896, x878, x880); - uint32_t x901, uint8_t x902 = addcarryx_u32(x899, x881, x883); - uint32_t x904, uint8_t x905 = addcarryx_u32(x902, x884, x886); - uint32_t x907, uint8_t _ = addcarryx_u32(0x0, x905, x887); - uint32_t _, uint8_t x911 = addcarryx_u32(0x0, x844, x868); - uint32_t x913, uint8_t x914 = addcarryx_u32(x911, x847, x889); - uint32_t x916, uint8_t x917 = addcarryx_u32(x914, x850, x892); - uint32_t x919, uint8_t x920 = addcarryx_u32(x917, x853, x895); - uint32_t x922, uint8_t x923 = addcarryx_u32(x920, x856, x898); - uint32_t x925, uint8_t x926 = addcarryx_u32(x923, x859, x901); - uint32_t x928, uint8_t x929 = addcarryx_u32(x926, x862, x904); - uint32_t x931, uint8_t x932 = addcarryx_u32(x929, x865, x907); - uint8_t x933 = (x932 + x866); - uint32_t x935, uint8_t x936 = subborrow_u32(0x0, x913, 0xffffffff); - uint32_t x938, uint8_t x939 = subborrow_u32(x936, x916, 0xffffffff); - uint32_t x941, uint8_t x942 = subborrow_u32(x939, x919, 0xffffffff); - uint32_t x944, uint8_t x945 = subborrow_u32(x942, x922, 0xffffffff); - uint32_t x947, uint8_t x948 = subborrow_u32(x945, x925, 0xffffffff); - uint32_t x950, uint8_t x951 = subborrow_u32(x948, x928, 0xffffffff); - uint32_t x953, uint8_t x954 = subborrow_u32(x951, x931, 0x14bf); - uint32_t _, uint8_t x957 = subborrow_u32(x954, x933, 0x0); - uint32_t x958 = cmovznz(x957, x953, x931); - uint32_t x959 = cmovznz(x957, x950, x928); - uint32_t x960 = cmovznz(x957, x947, x925); - uint32_t x961 = cmovznz(x957, x944, x922); - uint32_t x962 = cmovznz(x957, x941, x919); - uint32_t x963 = cmovznz(x957, x938, x916); - uint32_t x964 = cmovznz(x957, x935, x913); - return (x958, x959, x960, x961, x962, x963, x964)) -(x, x0)%core - : word32 * word32 * word32 * word32 * word32 * word32 * word32 → word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType (uint32_t * uint32_t * uint32_t * uint32_t * uint32_t * uint32_t * uint32_t) diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/femulDisplay.v b/src/Specific/montgomery32_2e205m45x2e198m1/femulDisplay.v deleted file mode 100644 index f51bb90df..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/femulDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.femul. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display mul. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/fenz.c b/src/Specific/montgomery32_2e205m45x2e198m1/fenz.c deleted file mode 100644 index 387dcfe67..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/fenz.c +++ /dev/null @@ -1,17 +0,0 @@ -static void fenz(ReturnType uint32_t out[1], const uint32_t in1[7]) { - { const uint32_t x11 = in1[6]; - { const uint32_t x12 = in1[5]; - { const uint32_t x10 = in1[4]; - { const uint32_t x8 = in1[3]; - { const uint32_t x6 = in1[2]; - { const uint32_t x4 = in1[1]; - { const uint32_t x2 = in1[0]; - { uint32_t x13 = (x12 | x11); - { uint32_t x14 = (x10 | x13); - { uint32_t x15 = (x8 | x14); - { uint32_t x16 = (x6 | x15); - { uint32_t x17 = (x4 | x16); - { uint32_t x18 = (x2 | x17); - out[0] = x18; - }}}}}}}}}}}}} -} diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/fenz.v b/src/Specific/montgomery32_2e205m45x2e198m1/fenz.v deleted file mode 100644 index dde9441c0..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/fenz.v +++ /dev/null @@ -1,16 +0,0 @@ -Require Import Coq.ZArith.ZArith. -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.Synthesis. -Local Open Scope Z_scope. - -(* TODO : change this to field once field isomorphism happens *) -Definition nonzero : - { nonzero : feBW_small -> BoundedWord.BoundedWord 1 adjusted_bitwidth bound1 - | forall a, (BoundedWord.BoundedWordToZ _ _ _ (nonzero a) =? 0) = (if Decidable.dec (phiM_small a = F.of_Z m 0) then true else false) }. -Proof. - Set Ltac Profiling. - Time synthesize_nonzero (). - Show Ltac Profile. -Time Defined. - -Print Assumptions nonzero. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/fenzDisplay.log b/src/Specific/montgomery32_2e205m45x2e198m1/fenzDisplay.log deleted file mode 100644 index 9685f89d7..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/fenzDisplay.log +++ /dev/null @@ -1,13 +0,0 @@ -λ x : word32 * word32 * word32 * word32 * word32 * word32 * word32, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x11, x12, x10, x8, x6, x4, x2)%core, - uint32_t x13 = (x12 | x11); - uint32_t x14 = (x10 | x13); - uint32_t x15 = (x8 | x14); - uint32_t x16 = (x6 | x15); - uint32_t x17 = (x4 | x16); - uint32_t x18 = (x2 | x17); - return x18) -x - : word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType uint32_t diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/fenzDisplay.v b/src/Specific/montgomery32_2e205m45x2e198m1/fenzDisplay.v deleted file mode 100644 index 44965faef..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/fenzDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.fenz. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display nonzero. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/feopp.v b/src/Specific/montgomery32_2e205m45x2e198m1/feopp.v deleted file mode 100644 index 0c0ffd4b8..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/feopp.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.Synthesis. - -(* TODO : change this to field once field isomorphism happens *) -Definition opp : - { opp : feBW_small -> feBW_small - | forall a, phiM_small (opp a) = F.opp (phiM_small a) }. -Proof. - Set Ltac Profiling. - Time synthesize_opp (). - Show Ltac Profile. -Time Defined. - -Print Assumptions opp. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/feoppDisplay.log b/src/Specific/montgomery32_2e205m45x2e198m1/feoppDisplay.log deleted file mode 100644 index e61d0e1a8..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/feoppDisplay.log +++ /dev/null @@ -1,29 +0,0 @@ -λ x : word32 * word32 * word32 * word32 * word32 * word32 * word32, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x11, x12, x10, x8, x6, x4, x2)%core, - uint32_t x14, uint8_t x15 = subborrow_u32(0x0, 0x0, x2); - uint32_t x17, uint8_t x18 = subborrow_u32(x15, 0x0, x4); - uint32_t x20, uint8_t x21 = subborrow_u32(x18, 0x0, x6); - uint32_t x23, uint8_t x24 = subborrow_u32(x21, 0x0, x8); - uint32_t x26, uint8_t x27 = subborrow_u32(x24, 0x0, x10); - uint32_t x29, uint8_t x30 = subborrow_u32(x27, 0x0, x12); - uint32_t x32, uint8_t x33 = subborrow_u32(x30, 0x0, x11); - uint32_t x34 = (uint32_t)cmovznz(x33, 0x0, 0xffffffff); - uint32_t x35 = (x34 & 0xffffffff); - uint32_t x37, uint8_t x38 = addcarryx_u32(0x0, x14, x35); - uint32_t x39 = (x34 & 0xffffffff); - uint32_t x41, uint8_t x42 = addcarryx_u32(x38, x17, x39); - uint32_t x43 = (x34 & 0xffffffff); - uint32_t x45, uint8_t x46 = addcarryx_u32(x42, x20, x43); - uint32_t x47 = (x34 & 0xffffffff); - uint32_t x49, uint8_t x50 = addcarryx_u32(x46, x23, x47); - uint32_t x51 = (x34 & 0xffffffff); - uint32_t x53, uint8_t x54 = addcarryx_u32(x50, x26, x51); - uint32_t x55 = (x34 & 0xffffffff); - uint32_t x57, uint8_t x58 = addcarryx_u32(x54, x29, x55); - uint32_t x59 = (x34 & 0x14bf); - uint32_t x61, uint8_t _ = addcarryx_u32(x58, x32, x59); - (Return x61, Return x57, Return x53, Return x49, Return x45, Return x41, Return x37)) -x - : word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType (uint32_t * uint32_t * uint32_t * uint32_t * uint32_t * uint32_t * uint32_t) diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/feoppDisplay.v b/src/Specific/montgomery32_2e205m45x2e198m1/feoppDisplay.v deleted file mode 100644 index eba98ca57..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/feoppDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.feopp. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display opp. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/fesquare.c b/src/Specific/montgomery32_2e205m45x2e198m1/fesquare.c deleted file mode 100644 index e3345edfe..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/fesquare.c +++ /dev/null @@ -1,5 +0,0 @@ -/* WARNING: This file was copied from Specific/CurveParameters/montgomery32/fesquare.c. - If you edit it here, changes will be erased the next time remake_curves.sh is run. */ -static void fesquare(uint32_t *out, const uint32_t *in) { - femul(out, in, in); -} diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/fesub.v b/src/Specific/montgomery32_2e205m45x2e198m1/fesub.v deleted file mode 100644 index 2b2f35c4d..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/fesub.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.Synthesis. - -(* TODO : change this to field once field isomorphism happens *) -Definition sub : - { sub : feBW_small -> feBW_small -> feBW_small - | forall a b, phiM_small (sub a b) = F.sub (phiM_small a) (phiM_small b) }. -Proof. - Set Ltac Profiling. - Time synthesize_sub (). - Show Ltac Profile. -Time Defined. - -Print Assumptions sub. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/fesubDisplay.log b/src/Specific/montgomery32_2e205m45x2e198m1/fesubDisplay.log deleted file mode 100644 index ac03bd3c7..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/fesubDisplay.log +++ /dev/null @@ -1,29 +0,0 @@ -λ x x0 : word32 * word32 * word32 * word32 * word32 * word32 * word32, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x14, x15, x13, x11, x9, x7, x5, (x26, x27, x25, x23, x21, x19, x17))%core, - uint32_t x29, uint8_t x30 = subborrow_u32(0x0, x5, x17); - uint32_t x32, uint8_t x33 = subborrow_u32(x30, x7, x19); - uint32_t x35, uint8_t x36 = subborrow_u32(x33, x9, x21); - uint32_t x38, uint8_t x39 = subborrow_u32(x36, x11, x23); - uint32_t x41, uint8_t x42 = subborrow_u32(x39, x13, x25); - uint32_t x44, uint8_t x45 = subborrow_u32(x42, x15, x27); - uint32_t x47, uint8_t x48 = subborrow_u32(x45, x14, x26); - uint32_t x49 = (uint32_t)cmovznz(x48, 0x0, 0xffffffff); - uint32_t x50 = (x49 & 0xffffffff); - uint32_t x52, uint8_t x53 = addcarryx_u32(0x0, x29, x50); - uint32_t x54 = (x49 & 0xffffffff); - uint32_t x56, uint8_t x57 = addcarryx_u32(x53, x32, x54); - uint32_t x58 = (x49 & 0xffffffff); - uint32_t x60, uint8_t x61 = addcarryx_u32(x57, x35, x58); - uint32_t x62 = (x49 & 0xffffffff); - uint32_t x64, uint8_t x65 = addcarryx_u32(x61, x38, x62); - uint32_t x66 = (x49 & 0xffffffff); - uint32_t x68, uint8_t x69 = addcarryx_u32(x65, x41, x66); - uint32_t x70 = (x49 & 0xffffffff); - uint32_t x72, uint8_t x73 = addcarryx_u32(x69, x44, x70); - uint32_t x74 = (x49 & 0x14bf); - uint32_t x76, uint8_t _ = addcarryx_u32(x73, x47, x74); - (Return x76, Return x72, Return x68, Return x64, Return x60, Return x56, Return x52)) -(x, x0)%core - : word32 * word32 * word32 * word32 * word32 * word32 * word32 → word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType (uint32_t * uint32_t * uint32_t * uint32_t * uint32_t * uint32_t * uint32_t) diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/fesubDisplay.v b/src/Specific/montgomery32_2e205m45x2e198m1/fesubDisplay.v deleted file mode 100644 index 643f85d2d..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/fesubDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery32_2e205m45x2e198m1.fesub. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display sub. diff --git a/src/Specific/montgomery32_2e205m45x2e198m1/py_interpreter.sh b/src/Specific/montgomery32_2e205m45x2e198m1/py_interpreter.sh deleted file mode 100755 index 3649864ca..000000000 --- a/src/Specific/montgomery32_2e205m45x2e198m1/py_interpreter.sh +++ /dev/null @@ -1,4 +0,0 @@ -#!/bin/sh -set -eu - -/usr/bin/env python3 "$@" -Dq='2**205 - 45*2**198 - 1' -Dmodulus_bytes='32' -Da24='121665' |