diff options
Diffstat (limited to 'src/Specific/montgomery64_2e198m17_4limbs')
26 files changed, 0 insertions, 570 deletions
diff --git a/src/Specific/montgomery64_2e198m17_4limbs/CurveParameters.v b/src/Specific/montgomery64_2e198m17_4limbs/CurveParameters.v deleted file mode 100644 index 16c39e743..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/CurveParameters.v +++ /dev/null @@ -1,39 +0,0 @@ -Require Import Crypto.Specific.Framework.RawCurveParameters. -Require Import Crypto.Util.LetIn. - -(*** -Modulus : 2^198 - 17 -Base: 64 -***) - -Definition curve : CurveParameters := - {| - sz := 4%nat; - base := 64; - bitwidth := 64; - s := 2^198; - c := [(1, 17)]; - 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/montgomery64_2e198m17_4limbs/Synthesis.v b/src/Specific/montgomery64_2e198m17_4limbs/Synthesis.v deleted file mode 100644 index 8c1e199d8..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/Synthesis.v +++ /dev/null @@ -1,9 +0,0 @@ -Require Import Crypto.Specific.Framework.SynthesisFramework. -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.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/montgomery64_2e198m17_4limbs/compiler.sh b/src/Specific/montgomery64_2e198m17_4limbs/compiler.sh deleted file mode 100755 index 365b34dfe..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/compiler.sh +++ /dev/null @@ -1,4 +0,0 @@ -#!/bin/sh -set -eu - -clang -fbracket-depth=999999 -march=native -mbmi2 -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,0x30,0x39}' -Dbitwidth='64' -Dlimb_weight_gaps_array='{64,64,64,64}' -Dmodulus_array='{0x3f,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xef}' -Dmodulus_bytes_val='25' -Dmodulus_limbs='4' -Dq_mpz='(1_mpz<<198) - 17' "$@" diff --git a/src/Specific/montgomery64_2e198m17_4limbs/compilerxx.sh b/src/Specific/montgomery64_2e198m17_4limbs/compilerxx.sh deleted file mode 100755 index fa415d831..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/compilerxx.sh +++ /dev/null @@ -1,4 +0,0 @@ -#!/bin/sh -set -eu - -clang++ -fbracket-depth=999999 -march=native -mbmi2 -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,0x30,0x39}' -Dbitwidth='64' -Dlimb_weight_gaps_array='{64,64,64,64}' -Dmodulus_array='{0x3f,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xef}' -Dmodulus_bytes_val='25' -Dmodulus_limbs='4' -Dq_mpz='(1_mpz<<198) - 17' "$@" diff --git a/src/Specific/montgomery64_2e198m17_4limbs/feadd.c b/src/Specific/montgomery64_2e198m17_4limbs/feadd.c deleted file mode 100644 index 462dab71d..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/feadd.c +++ /dev/null @@ -1,28 +0,0 @@ -static void feadd(uint64_t out[4], const uint64_t in1[4], const uint64_t in2[4]) { - { const uint64_t x8 = in1[3]; - { const uint64_t x9 = in1[2]; - { const uint64_t x7 = in1[1]; - { const uint64_t x5 = in1[0]; - { const uint64_t x14 = in2[3]; - { const uint64_t x15 = in2[2]; - { const uint64_t x13 = in2[1]; - { const uint64_t x11 = in2[0]; - { uint64_t x17; uint8_t x18 = _addcarryx_u64(0x0, x5, x11, &x17); - { uint64_t x20; uint8_t x21 = _addcarryx_u64(x18, x7, x13, &x20); - { uint64_t x23; uint8_t x24 = _addcarryx_u64(x21, x9, x15, &x23); - { uint64_t x26; uint8_t x27 = _addcarryx_u64(x24, x8, x14, &x26); - { uint64_t x29; uint8_t x30 = _subborrow_u64(0x0, x17, 0xffffffffffffffefL, &x29); - { uint64_t x32; uint8_t x33 = _subborrow_u64(x30, x20, 0xffffffffffffffffL, &x32); - { uint64_t x35; uint8_t x36 = _subborrow_u64(x33, x23, 0xffffffffffffffffL, &x35); - { uint64_t x38; uint8_t x39 = _subborrow_u64(x36, x26, 0x3f, &x38); - { uint64_t _; uint8_t x42 = _subborrow_u64(x39, x27, 0x0, &_); - { uint64_t x43 = cmovznz64(x42, x38, x26); - { uint64_t x44 = cmovznz64(x42, x35, x23); - { uint64_t x45 = cmovznz64(x42, x32, x20); - { uint64_t x46 = cmovznz64(x42, x29, x17); - out[0] = x46; - out[1] = x45; - out[2] = x44; - out[3] = x43; - }}}}}}}}}}}}}}}}}}}}} -} diff --git a/src/Specific/montgomery64_2e198m17_4limbs/feadd.v b/src/Specific/montgomery64_2e198m17_4limbs/feadd.v deleted file mode 100644 index 94635fa24..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/feadd.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.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/montgomery64_2e198m17_4limbs/feaddDisplay.log b/src/Specific/montgomery64_2e198m17_4limbs/feaddDisplay.log deleted file mode 100644 index d4d34eddd..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/feaddDisplay.log +++ /dev/null @@ -1,20 +0,0 @@ -λ x x0 : word64 * word64 * word64 * word64, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x8, x9, x7, x5, (x14, x15, x13, x11))%core, - uint64_t x17, uint8_t x18 = addcarryx_u64(0x0, x5, x11); - uint64_t x20, uint8_t x21 = addcarryx_u64(x18, x7, x13); - uint64_t x23, uint8_t x24 = addcarryx_u64(x21, x9, x15); - uint64_t x26, uint8_t x27 = addcarryx_u64(x24, x8, x14); - uint64_t x29, uint8_t x30 = subborrow_u64(0x0, x17, 0xffffffffffffffefL); - uint64_t x32, uint8_t x33 = subborrow_u64(x30, x20, 0xffffffffffffffffL); - uint64_t x35, uint8_t x36 = subborrow_u64(x33, x23, 0xffffffffffffffffL); - uint64_t x38, uint8_t x39 = subborrow_u64(x36, x26, 0x3f); - uint64_t _, uint8_t x42 = subborrow_u64(x39, x27, 0x0); - uint64_t x43 = cmovznz64(x42, x38, x26); - uint64_t x44 = cmovznz64(x42, x35, x23); - uint64_t x45 = cmovznz64(x42, x32, x20); - uint64_t x46 = cmovznz64(x42, x29, x17); - return (x43, x44, x45, x46)) -(x, x0)%core - : word64 * word64 * word64 * word64 → word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t) diff --git a/src/Specific/montgomery64_2e198m17_4limbs/feaddDisplay.v b/src/Specific/montgomery64_2e198m17_4limbs/feaddDisplay.v deleted file mode 100644 index 7a94878bf..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/feaddDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.feadd. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display add. diff --git a/src/Specific/montgomery64_2e198m17_4limbs/femul.c b/src/Specific/montgomery64_2e198m17_4limbs/femul.c deleted file mode 100644 index 3e5aad476..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/femul.c +++ /dev/null @@ -1,130 +0,0 @@ -static void femul(uint64_t out[4], const uint64_t in1[4], const uint64_t in2[4]) { - { const uint64_t x8 = in1[3]; - { const uint64_t x9 = in1[2]; - { const uint64_t x7 = in1[1]; - { const uint64_t x5 = in1[0]; - { const uint64_t x14 = in2[3]; - { const uint64_t x15 = in2[2]; - { const uint64_t x13 = in2[1]; - { const uint64_t x11 = in2[0]; - { uint64_t x18; uint64_t x17 = _mulx_u64(x5, x11, &x18); - { uint64_t x21; uint64_t x20 = _mulx_u64(x5, x13, &x21); - { uint64_t x24; uint64_t x23 = _mulx_u64(x5, x15, &x24); - { uint64_t x27; uint64_t x26 = _mulx_u64(x5, x14, &x27); - { uint64_t x29; uint8_t x30 = _addcarryx_u64(0x0, x18, x20, &x29); - { uint64_t x32; uint8_t x33 = _addcarryx_u64(x30, x21, x23, &x32); - { uint64_t x35; uint8_t x36 = _addcarryx_u64(x33, x24, x26, &x35); - { uint64_t x38; uint8_t _ = _addcarryx_u64(0x0, x36, x27, &x38); - { uint64_t _; uint64_t x41 = _mulx_u64(x17, 0xf0f0f0f0f0f0f0f1L, &_); - { uint64_t x45; uint64_t x44 = _mulx_u64(x41, 0xffffffffffffffefL, &x45); - { uint64_t x48; uint64_t x47 = _mulx_u64(x41, 0xffffffffffffffffL, &x48); - { uint64_t x51; uint64_t x50 = _mulx_u64(x41, 0xffffffffffffffffL, &x51); - { uint8_t x54; uint64_t x53 = _mulx_u64_out_u8(x41, 0x3f, &x54); - { uint64_t x56; uint8_t x57 = _addcarryx_u64(0x0, x45, x47, &x56); - { uint64_t x59; uint8_t x60 = _addcarryx_u64(x57, x48, x50, &x59); - { uint64_t x62; uint8_t x63 = _addcarryx_u64(x60, x51, x53, &x62); - { uint8_t x64 = (x63 + x54); - { uint64_t _; uint8_t x67 = _addcarryx_u64(0x0, x17, x44, &_); - { uint64_t x69; uint8_t x70 = _addcarryx_u64(x67, x29, x56, &x69); - { uint64_t x72; uint8_t x73 = _addcarryx_u64(x70, x32, x59, &x72); - { uint64_t x75; uint8_t x76 = _addcarryx_u64(x73, x35, x62, &x75); - { uint64_t x78; uint8_t x79 = _addcarryx_u64(x76, x38, x64, &x78); - { uint64_t x82; uint64_t x81 = _mulx_u64(x7, x11, &x82); - { uint64_t x85; uint64_t x84 = _mulx_u64(x7, x13, &x85); - { uint64_t x88; uint64_t x87 = _mulx_u64(x7, x15, &x88); - { uint64_t x91; uint64_t x90 = _mulx_u64(x7, x14, &x91); - { uint64_t x93; uint8_t x94 = _addcarryx_u64(0x0, x82, x84, &x93); - { uint64_t x96; uint8_t x97 = _addcarryx_u64(x94, x85, x87, &x96); - { uint64_t x99; uint8_t x100 = _addcarryx_u64(x97, x88, x90, &x99); - { uint64_t x102; uint8_t _ = _addcarryx_u64(0x0, x100, x91, &x102); - { uint64_t x105; uint8_t x106 = _addcarryx_u64(0x0, x69, x81, &x105); - { uint64_t x108; uint8_t x109 = _addcarryx_u64(x106, x72, x93, &x108); - { uint64_t x111; uint8_t x112 = _addcarryx_u64(x109, x75, x96, &x111); - { uint64_t x114; uint8_t x115 = _addcarryx_u64(x112, x78, x99, &x114); - { uint64_t x117; uint8_t x118 = _addcarryx_u64(x115, x79, x102, &x117); - { uint64_t _; uint64_t x120 = _mulx_u64(x105, 0xf0f0f0f0f0f0f0f1L, &_); - { uint64_t x124; uint64_t x123 = _mulx_u64(x120, 0xffffffffffffffefL, &x124); - { uint64_t x127; uint64_t x126 = _mulx_u64(x120, 0xffffffffffffffffL, &x127); - { uint64_t x130; uint64_t x129 = _mulx_u64(x120, 0xffffffffffffffffL, &x130); - { uint8_t x133; uint64_t x132 = _mulx_u64_out_u8(x120, 0x3f, &x133); - { uint64_t x135; uint8_t x136 = _addcarryx_u64(0x0, x124, x126, &x135); - { uint64_t x138; uint8_t x139 = _addcarryx_u64(x136, x127, x129, &x138); - { uint64_t x141; uint8_t x142 = _addcarryx_u64(x139, x130, x132, &x141); - { uint8_t x143 = (x142 + x133); - { uint64_t _; uint8_t x146 = _addcarryx_u64(0x0, x105, x123, &_); - { uint64_t x148; uint8_t x149 = _addcarryx_u64(x146, x108, x135, &x148); - { uint64_t x151; uint8_t x152 = _addcarryx_u64(x149, x111, x138, &x151); - { uint64_t x154; uint8_t x155 = _addcarryx_u64(x152, x114, x141, &x154); - { uint64_t x157; uint8_t x158 = _addcarryx_u64(x155, x117, x143, &x157); - { uint8_t x159 = (x158 + x118); - { uint64_t x162; uint64_t x161 = _mulx_u64(x9, x11, &x162); - { uint64_t x165; uint64_t x164 = _mulx_u64(x9, x13, &x165); - { uint64_t x168; uint64_t x167 = _mulx_u64(x9, x15, &x168); - { uint64_t x171; uint64_t x170 = _mulx_u64(x9, x14, &x171); - { uint64_t x173; uint8_t x174 = _addcarryx_u64(0x0, x162, x164, &x173); - { uint64_t x176; uint8_t x177 = _addcarryx_u64(x174, x165, x167, &x176); - { uint64_t x179; uint8_t x180 = _addcarryx_u64(x177, x168, x170, &x179); - { uint64_t x182; uint8_t _ = _addcarryx_u64(0x0, x180, x171, &x182); - { uint64_t x185; uint8_t x186 = _addcarryx_u64(0x0, x148, x161, &x185); - { uint64_t x188; uint8_t x189 = _addcarryx_u64(x186, x151, x173, &x188); - { uint64_t x191; uint8_t x192 = _addcarryx_u64(x189, x154, x176, &x191); - { uint64_t x194; uint8_t x195 = _addcarryx_u64(x192, x157, x179, &x194); - { uint64_t x197; uint8_t x198 = _addcarryx_u64(x195, x159, x182, &x197); - { uint64_t _; uint64_t x200 = _mulx_u64(x185, 0xf0f0f0f0f0f0f0f1L, &_); - { uint64_t x204; uint64_t x203 = _mulx_u64(x200, 0xffffffffffffffefL, &x204); - { uint64_t x207; uint64_t x206 = _mulx_u64(x200, 0xffffffffffffffffL, &x207); - { uint64_t x210; uint64_t x209 = _mulx_u64(x200, 0xffffffffffffffffL, &x210); - { uint8_t x213; uint64_t x212 = _mulx_u64_out_u8(x200, 0x3f, &x213); - { uint64_t x215; uint8_t x216 = _addcarryx_u64(0x0, x204, x206, &x215); - { uint64_t x218; uint8_t x219 = _addcarryx_u64(x216, x207, x209, &x218); - { uint64_t x221; uint8_t x222 = _addcarryx_u64(x219, x210, x212, &x221); - { uint8_t x223 = (x222 + x213); - { uint64_t _; uint8_t x226 = _addcarryx_u64(0x0, x185, x203, &_); - { uint64_t x228; uint8_t x229 = _addcarryx_u64(x226, x188, x215, &x228); - { uint64_t x231; uint8_t x232 = _addcarryx_u64(x229, x191, x218, &x231); - { uint64_t x234; uint8_t x235 = _addcarryx_u64(x232, x194, x221, &x234); - { uint64_t x237; uint8_t x238 = _addcarryx_u64(x235, x197, x223, &x237); - { uint8_t x239 = (x238 + x198); - { uint64_t x242; uint64_t x241 = _mulx_u64(x8, x11, &x242); - { uint64_t x245; uint64_t x244 = _mulx_u64(x8, x13, &x245); - { uint64_t x248; uint64_t x247 = _mulx_u64(x8, x15, &x248); - { uint64_t x251; uint64_t x250 = _mulx_u64(x8, x14, &x251); - { uint64_t x253; uint8_t x254 = _addcarryx_u64(0x0, x242, x244, &x253); - { uint64_t x256; uint8_t x257 = _addcarryx_u64(x254, x245, x247, &x256); - { uint64_t x259; uint8_t x260 = _addcarryx_u64(x257, x248, x250, &x259); - { uint64_t x262; uint8_t _ = _addcarryx_u64(0x0, x260, x251, &x262); - { uint64_t x265; uint8_t x266 = _addcarryx_u64(0x0, x228, x241, &x265); - { uint64_t x268; uint8_t x269 = _addcarryx_u64(x266, x231, x253, &x268); - { uint64_t x271; uint8_t x272 = _addcarryx_u64(x269, x234, x256, &x271); - { uint64_t x274; uint8_t x275 = _addcarryx_u64(x272, x237, x259, &x274); - { uint64_t x277; uint8_t x278 = _addcarryx_u64(x275, x239, x262, &x277); - { uint64_t _; uint64_t x280 = _mulx_u64(x265, 0xf0f0f0f0f0f0f0f1L, &_); - { uint64_t x284; uint64_t x283 = _mulx_u64(x280, 0xffffffffffffffefL, &x284); - { uint64_t x287; uint64_t x286 = _mulx_u64(x280, 0xffffffffffffffffL, &x287); - { uint64_t x290; uint64_t x289 = _mulx_u64(x280, 0xffffffffffffffffL, &x290); - { uint8_t x293; uint64_t x292 = _mulx_u64_out_u8(x280, 0x3f, &x293); - { uint64_t x295; uint8_t x296 = _addcarryx_u64(0x0, x284, x286, &x295); - { uint64_t x298; uint8_t x299 = _addcarryx_u64(x296, x287, x289, &x298); - { uint64_t x301; uint8_t x302 = _addcarryx_u64(x299, x290, x292, &x301); - { uint8_t x303 = (x302 + x293); - { uint64_t _; uint8_t x306 = _addcarryx_u64(0x0, x265, x283, &_); - { uint64_t x308; uint8_t x309 = _addcarryx_u64(x306, x268, x295, &x308); - { uint64_t x311; uint8_t x312 = _addcarryx_u64(x309, x271, x298, &x311); - { uint64_t x314; uint8_t x315 = _addcarryx_u64(x312, x274, x301, &x314); - { uint64_t x317; uint8_t x318 = _addcarryx_u64(x315, x277, x303, &x317); - { uint8_t x319 = (x318 + x278); - { uint64_t x321; uint8_t x322 = _subborrow_u64(0x0, x308, 0xffffffffffffffefL, &x321); - { uint64_t x324; uint8_t x325 = _subborrow_u64(x322, x311, 0xffffffffffffffffL, &x324); - { uint64_t x327; uint8_t x328 = _subborrow_u64(x325, x314, 0xffffffffffffffffL, &x327); - { uint64_t x330; uint8_t x331 = _subborrow_u64(x328, x317, 0x3f, &x330); - { uint64_t _; uint8_t x334 = _subborrow_u64(x331, x319, 0x0, &_); - { uint64_t x335 = cmovznz64(x334, x330, x317); - { uint64_t x336 = cmovznz64(x334, x327, x314); - { uint64_t x337 = cmovznz64(x334, x324, x311); - { uint64_t x338 = cmovznz64(x334, x321, x308); - out[0] = x338; - out[1] = x337; - out[2] = x336; - out[3] = x335; - }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}} -} diff --git a/src/Specific/montgomery64_2e198m17_4limbs/femul.v b/src/Specific/montgomery64_2e198m17_4limbs/femul.v deleted file mode 100644 index 185665bac..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/femul.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.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/montgomery64_2e198m17_4limbs/femulDisplay.log b/src/Specific/montgomery64_2e198m17_4limbs/femulDisplay.log deleted file mode 100644 index 8823d6e80..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/femulDisplay.log +++ /dev/null @@ -1,122 +0,0 @@ -λ x x0 : word64 * word64 * word64 * word64, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x8, x9, x7, x5, (x14, x15, x13, x11))%core, - uint64_t x17, uint64_t x18 = mulx_u64(x5, x11); - uint64_t x20, uint64_t x21 = mulx_u64(x5, x13); - uint64_t x23, uint64_t x24 = mulx_u64(x5, x15); - uint64_t x26, uint64_t x27 = mulx_u64(x5, x14); - uint64_t x29, uint8_t x30 = addcarryx_u64(0x0, x18, x20); - uint64_t x32, uint8_t x33 = addcarryx_u64(x30, x21, x23); - uint64_t x35, uint8_t x36 = addcarryx_u64(x33, x24, x26); - uint64_t x38, uint8_t _ = addcarryx_u64(0x0, x36, x27); - uint64_t x41, uint64_t _ = mulx_u64(x17, 0xf0f0f0f0f0f0f0f1L); - uint64_t x44, uint64_t x45 = mulx_u64(x41, 0xffffffffffffffefL); - uint64_t x47, uint64_t x48 = mulx_u64(x41, 0xffffffffffffffffL); - uint64_t x50, uint64_t x51 = mulx_u64(x41, 0xffffffffffffffffL); - uint64_t x53, uint8_t x54 = mulx_u64_out_u8(x41, 0x3f); - uint64_t x56, uint8_t x57 = addcarryx_u64(0x0, x45, x47); - uint64_t x59, uint8_t x60 = addcarryx_u64(x57, x48, x50); - uint64_t x62, uint8_t x63 = addcarryx_u64(x60, x51, x53); - uint8_t x64 = (x63 + x54); - uint64_t _, uint8_t x67 = addcarryx_u64(0x0, x17, x44); - uint64_t x69, uint8_t x70 = addcarryx_u64(x67, x29, x56); - uint64_t x72, uint8_t x73 = addcarryx_u64(x70, x32, x59); - uint64_t x75, uint8_t x76 = addcarryx_u64(x73, x35, x62); - uint64_t x78, uint8_t x79 = addcarryx_u64(x76, x38, x64); - uint64_t x81, uint64_t x82 = mulx_u64(x7, x11); - uint64_t x84, uint64_t x85 = mulx_u64(x7, x13); - uint64_t x87, uint64_t x88 = mulx_u64(x7, x15); - uint64_t x90, uint64_t x91 = mulx_u64(x7, x14); - uint64_t x93, uint8_t x94 = addcarryx_u64(0x0, x82, x84); - uint64_t x96, uint8_t x97 = addcarryx_u64(x94, x85, x87); - uint64_t x99, uint8_t x100 = addcarryx_u64(x97, x88, x90); - uint64_t x102, uint8_t _ = addcarryx_u64(0x0, x100, x91); - uint64_t x105, uint8_t x106 = addcarryx_u64(0x0, x69, x81); - uint64_t x108, uint8_t x109 = addcarryx_u64(x106, x72, x93); - uint64_t x111, uint8_t x112 = addcarryx_u64(x109, x75, x96); - uint64_t x114, uint8_t x115 = addcarryx_u64(x112, x78, x99); - uint64_t x117, uint8_t x118 = addcarryx_u64(x115, x79, x102); - uint64_t x120, uint64_t _ = mulx_u64(x105, 0xf0f0f0f0f0f0f0f1L); - uint64_t x123, uint64_t x124 = mulx_u64(x120, 0xffffffffffffffefL); - uint64_t x126, uint64_t x127 = mulx_u64(x120, 0xffffffffffffffffL); - uint64_t x129, uint64_t x130 = mulx_u64(x120, 0xffffffffffffffffL); - uint64_t x132, uint8_t x133 = mulx_u64_out_u8(x120, 0x3f); - uint64_t x135, uint8_t x136 = addcarryx_u64(0x0, x124, x126); - uint64_t x138, uint8_t x139 = addcarryx_u64(x136, x127, x129); - uint64_t x141, uint8_t x142 = addcarryx_u64(x139, x130, x132); - uint8_t x143 = (x142 + x133); - uint64_t _, uint8_t x146 = addcarryx_u64(0x0, x105, x123); - uint64_t x148, uint8_t x149 = addcarryx_u64(x146, x108, x135); - uint64_t x151, uint8_t x152 = addcarryx_u64(x149, x111, x138); - uint64_t x154, uint8_t x155 = addcarryx_u64(x152, x114, x141); - uint64_t x157, uint8_t x158 = addcarryx_u64(x155, x117, x143); - uint8_t x159 = (x158 + x118); - uint64_t x161, uint64_t x162 = mulx_u64(x9, x11); - uint64_t x164, uint64_t x165 = mulx_u64(x9, x13); - uint64_t x167, uint64_t x168 = mulx_u64(x9, x15); - uint64_t x170, uint64_t x171 = mulx_u64(x9, x14); - uint64_t x173, uint8_t x174 = addcarryx_u64(0x0, x162, x164); - uint64_t x176, uint8_t x177 = addcarryx_u64(x174, x165, x167); - uint64_t x179, uint8_t x180 = addcarryx_u64(x177, x168, x170); - uint64_t x182, uint8_t _ = addcarryx_u64(0x0, x180, x171); - uint64_t x185, uint8_t x186 = addcarryx_u64(0x0, x148, x161); - uint64_t x188, uint8_t x189 = addcarryx_u64(x186, x151, x173); - uint64_t x191, uint8_t x192 = addcarryx_u64(x189, x154, x176); - uint64_t x194, uint8_t x195 = addcarryx_u64(x192, x157, x179); - uint64_t x197, uint8_t x198 = addcarryx_u64(x195, x159, x182); - uint64_t x200, uint64_t _ = mulx_u64(x185, 0xf0f0f0f0f0f0f0f1L); - uint64_t x203, uint64_t x204 = mulx_u64(x200, 0xffffffffffffffefL); - uint64_t x206, uint64_t x207 = mulx_u64(x200, 0xffffffffffffffffL); - uint64_t x209, uint64_t x210 = mulx_u64(x200, 0xffffffffffffffffL); - uint64_t x212, uint8_t x213 = mulx_u64_out_u8(x200, 0x3f); - uint64_t x215, uint8_t x216 = addcarryx_u64(0x0, x204, x206); - uint64_t x218, uint8_t x219 = addcarryx_u64(x216, x207, x209); - uint64_t x221, uint8_t x222 = addcarryx_u64(x219, x210, x212); - uint8_t x223 = (x222 + x213); - uint64_t _, uint8_t x226 = addcarryx_u64(0x0, x185, x203); - uint64_t x228, uint8_t x229 = addcarryx_u64(x226, x188, x215); - uint64_t x231, uint8_t x232 = addcarryx_u64(x229, x191, x218); - uint64_t x234, uint8_t x235 = addcarryx_u64(x232, x194, x221); - uint64_t x237, uint8_t x238 = addcarryx_u64(x235, x197, x223); - uint8_t x239 = (x238 + x198); - uint64_t x241, uint64_t x242 = mulx_u64(x8, x11); - uint64_t x244, uint64_t x245 = mulx_u64(x8, x13); - uint64_t x247, uint64_t x248 = mulx_u64(x8, x15); - uint64_t x250, uint64_t x251 = mulx_u64(x8, x14); - uint64_t x253, uint8_t x254 = addcarryx_u64(0x0, x242, x244); - uint64_t x256, uint8_t x257 = addcarryx_u64(x254, x245, x247); - uint64_t x259, uint8_t x260 = addcarryx_u64(x257, x248, x250); - uint64_t x262, uint8_t _ = addcarryx_u64(0x0, x260, x251); - uint64_t x265, uint8_t x266 = addcarryx_u64(0x0, x228, x241); - uint64_t x268, uint8_t x269 = addcarryx_u64(x266, x231, x253); - uint64_t x271, uint8_t x272 = addcarryx_u64(x269, x234, x256); - uint64_t x274, uint8_t x275 = addcarryx_u64(x272, x237, x259); - uint64_t x277, uint8_t x278 = addcarryx_u64(x275, x239, x262); - uint64_t x280, uint64_t _ = mulx_u64(x265, 0xf0f0f0f0f0f0f0f1L); - uint64_t x283, uint64_t x284 = mulx_u64(x280, 0xffffffffffffffefL); - uint64_t x286, uint64_t x287 = mulx_u64(x280, 0xffffffffffffffffL); - uint64_t x289, uint64_t x290 = mulx_u64(x280, 0xffffffffffffffffL); - uint64_t x292, uint8_t x293 = mulx_u64_out_u8(x280, 0x3f); - uint64_t x295, uint8_t x296 = addcarryx_u64(0x0, x284, x286); - uint64_t x298, uint8_t x299 = addcarryx_u64(x296, x287, x289); - uint64_t x301, uint8_t x302 = addcarryx_u64(x299, x290, x292); - uint8_t x303 = (x302 + x293); - uint64_t _, uint8_t x306 = addcarryx_u64(0x0, x265, x283); - uint64_t x308, uint8_t x309 = addcarryx_u64(x306, x268, x295); - uint64_t x311, uint8_t x312 = addcarryx_u64(x309, x271, x298); - uint64_t x314, uint8_t x315 = addcarryx_u64(x312, x274, x301); - uint64_t x317, uint8_t x318 = addcarryx_u64(x315, x277, x303); - uint8_t x319 = (x318 + x278); - uint64_t x321, uint8_t x322 = subborrow_u64(0x0, x308, 0xffffffffffffffefL); - uint64_t x324, uint8_t x325 = subborrow_u64(x322, x311, 0xffffffffffffffffL); - uint64_t x327, uint8_t x328 = subborrow_u64(x325, x314, 0xffffffffffffffffL); - uint64_t x330, uint8_t x331 = subborrow_u64(x328, x317, 0x3f); - uint64_t _, uint8_t x334 = subborrow_u64(x331, x319, 0x0); - uint64_t x335 = cmovznz64(x334, x330, x317); - uint64_t x336 = cmovznz64(x334, x327, x314); - uint64_t x337 = cmovznz64(x334, x324, x311); - uint64_t x338 = cmovznz64(x334, x321, x308); - return (x335, x336, x337, x338)) -(x, x0)%core - : word64 * word64 * word64 * word64 → word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t) diff --git a/src/Specific/montgomery64_2e198m17_4limbs/femulDisplay.v b/src/Specific/montgomery64_2e198m17_4limbs/femulDisplay.v deleted file mode 100644 index d75c2feda..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/femulDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.femul. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display mul. diff --git a/src/Specific/montgomery64_2e198m17_4limbs/fenz.c b/src/Specific/montgomery64_2e198m17_4limbs/fenz.c deleted file mode 100644 index 7541094ff..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fenz.c +++ /dev/null @@ -1,11 +0,0 @@ -static void fenz(ReturnType uint64_t out[1], const uint64_t in1[4]) { - { const uint64_t x5 = in1[3]; - { const uint64_t x6 = in1[2]; - { const uint64_t x4 = in1[1]; - { const uint64_t x2 = in1[0]; - { uint64_t x7 = (x6 | x5); - { uint64_t x8 = (x4 | x7); - { uint64_t x9 = (x2 | x8); - out[0] = x9; - }}}}}}} -} diff --git a/src/Specific/montgomery64_2e198m17_4limbs/fenz.v b/src/Specific/montgomery64_2e198m17_4limbs/fenz.v deleted file mode 100644 index 4a7446ca3..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fenz.v +++ /dev/null @@ -1,16 +0,0 @@ -Require Import Coq.ZArith.ZArith. -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.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/montgomery64_2e198m17_4limbs/fenzDisplay.log b/src/Specific/montgomery64_2e198m17_4limbs/fenzDisplay.log deleted file mode 100644 index 65afbc2d6..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fenzDisplay.log +++ /dev/null @@ -1,10 +0,0 @@ -λ x : word64 * word64 * word64 * word64, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x5, x6, x4, x2)%core, - uint64_t x7 = (x6 | x5); - uint64_t x8 = (x4 | x7); - uint64_t x9 = (x2 | x8); - return x9) -x - : word64 * word64 * word64 * word64 → ReturnType uint64_t diff --git a/src/Specific/montgomery64_2e198m17_4limbs/fenzDisplay.v b/src/Specific/montgomery64_2e198m17_4limbs/fenzDisplay.v deleted file mode 100644 index 188c1157e..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fenzDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.fenz. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display nonzero. diff --git a/src/Specific/montgomery64_2e198m17_4limbs/feopp.c b/src/Specific/montgomery64_2e198m17_4limbs/feopp.c deleted file mode 100644 index 710608892..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/feopp.c +++ /dev/null @@ -1,24 +0,0 @@ -static void feopp(uint64_t out[4], const uint64_t in1[4]) { - { const uint64_t x5 = in1[3]; - { const uint64_t x6 = in1[2]; - { const uint64_t x4 = in1[1]; - { const uint64_t x2 = in1[0]; - { uint64_t x8; uint8_t x9 = _subborrow_u64(0x0, 0x0, x2, &x8); - { uint64_t x11; uint8_t x12 = _subborrow_u64(x9, 0x0, x4, &x11); - { uint64_t x14; uint8_t x15 = _subborrow_u64(x12, 0x0, x6, &x14); - { uint64_t x17; uint8_t x18 = _subborrow_u64(x15, 0x0, x5, &x17); - { uint64_t x19 = cmovznz64(x18, 0x0, 0xffffffffffffffffL); - { uint64_t x20 = (x19 & 0xffffffffffffffefL); - { uint64_t x22; uint8_t x23 = _addcarryx_u64(0x0, x8, x20, &x22); - { uint64_t x24 = (x19 & 0xffffffffffffffffL); - { uint64_t x26; uint8_t x27 = _addcarryx_u64(x23, x11, x24, &x26); - { uint64_t x28 = (x19 & 0xffffffffffffffffL); - { uint64_t x30; uint8_t x31 = _addcarryx_u64(x27, x14, x28, &x30); - { uint8_t x32 = ((uint8_t)x19 & 0x3f); - { uint64_t x34; uint8_t _ = _addcarryx_u64(x31, x17, x32, &x34); - out[0] = x22; - out[1] = x26; - out[2] = x30; - out[3] = x34; - }}}}}}}}}}}}}}}}} -} diff --git a/src/Specific/montgomery64_2e198m17_4limbs/feopp.v b/src/Specific/montgomery64_2e198m17_4limbs/feopp.v deleted file mode 100644 index 580fc90d0..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/feopp.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.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/montgomery64_2e198m17_4limbs/feoppDisplay.log b/src/Specific/montgomery64_2e198m17_4limbs/feoppDisplay.log deleted file mode 100644 index cb54ba741..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/feoppDisplay.log +++ /dev/null @@ -1,20 +0,0 @@ -λ x : word64 * word64 * word64 * word64, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x5, x6, x4, x2)%core, - uint64_t x8, uint8_t x9 = subborrow_u64(0x0, 0x0, x2); - uint64_t x11, uint8_t x12 = subborrow_u64(x9, 0x0, x4); - uint64_t x14, uint8_t x15 = subborrow_u64(x12, 0x0, x6); - uint64_t x17, uint8_t x18 = subborrow_u64(x15, 0x0, x5); - uint64_t x19 = cmovznz64(x18, 0x0, 0xffffffffffffffffL); - uint64_t x20 = (x19 & 0xffffffffffffffefL); - uint64_t x22, uint8_t x23 = addcarryx_u64(0x0, x8, x20); - uint64_t x24 = (x19 & 0xffffffffffffffffL); - uint64_t x26, uint8_t x27 = addcarryx_u64(x23, x11, x24); - uint64_t x28 = (x19 & 0xffffffffffffffffL); - uint64_t x30, uint8_t x31 = addcarryx_u64(x27, x14, x28); - uint8_t x32 = ((uint8_t)x19 & 0x3f); - uint64_t x34, uint8_t _ = addcarryx_u64(x31, x17, x32); - (Return x34, Return x30, Return x26, Return x22)) -x - : word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t) diff --git a/src/Specific/montgomery64_2e198m17_4limbs/feoppDisplay.v b/src/Specific/montgomery64_2e198m17_4limbs/feoppDisplay.v deleted file mode 100644 index 24280fac3..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/feoppDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.feopp. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display opp. diff --git a/src/Specific/montgomery64_2e198m17_4limbs/fesquare.c b/src/Specific/montgomery64_2e198m17_4limbs/fesquare.c deleted file mode 100644 index 7bd8db166..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fesquare.c +++ /dev/null @@ -1,5 +0,0 @@ -/* WARNING: This file was copied from Specific/CurveParameters/montgomery64/fesquare.c. - If you edit it here, changes will be erased the next time remake_curves.sh is run. */ -static void fesquare(uint64_t *out, const uint64_t *in) { - femul(out, in, in); -} diff --git a/src/Specific/montgomery64_2e198m17_4limbs/fesub.c b/src/Specific/montgomery64_2e198m17_4limbs/fesub.c deleted file mode 100644 index eb73e957b..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fesub.c +++ /dev/null @@ -1,28 +0,0 @@ -static void fesub(uint64_t out[4], const uint64_t in1[4], const uint64_t in2[4]) { - { const uint64_t x8 = in1[3]; - { const uint64_t x9 = in1[2]; - { const uint64_t x7 = in1[1]; - { const uint64_t x5 = in1[0]; - { const uint64_t x14 = in2[3]; - { const uint64_t x15 = in2[2]; - { const uint64_t x13 = in2[1]; - { const uint64_t x11 = in2[0]; - { uint64_t x17; uint8_t x18 = _subborrow_u64(0x0, x5, x11, &x17); - { uint64_t x20; uint8_t x21 = _subborrow_u64(x18, x7, x13, &x20); - { uint64_t x23; uint8_t x24 = _subborrow_u64(x21, x9, x15, &x23); - { uint64_t x26; uint8_t x27 = _subborrow_u64(x24, x8, x14, &x26); - { uint64_t x28 = cmovznz64(x27, 0x0, 0xffffffffffffffffL); - { uint64_t x29 = (x28 & 0xffffffffffffffefL); - { uint64_t x31; uint8_t x32 = _addcarryx_u64(0x0, x17, x29, &x31); - { uint64_t x33 = (x28 & 0xffffffffffffffffL); - { uint64_t x35; uint8_t x36 = _addcarryx_u64(x32, x20, x33, &x35); - { uint64_t x37 = (x28 & 0xffffffffffffffffL); - { uint64_t x39; uint8_t x40 = _addcarryx_u64(x36, x23, x37, &x39); - { uint8_t x41 = ((uint8_t)x28 & 0x3f); - { uint64_t x43; uint8_t _ = _addcarryx_u64(x40, x26, x41, &x43); - out[0] = x31; - out[1] = x35; - out[2] = x39; - out[3] = x43; - }}}}}}}}}}}}}}}}}}}}} -} diff --git a/src/Specific/montgomery64_2e198m17_4limbs/fesub.v b/src/Specific/montgomery64_2e198m17_4limbs/fesub.v deleted file mode 100644 index 9fa121538..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fesub.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import Crypto.Arithmetic.PrimeFieldTheorems. -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.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/montgomery64_2e198m17_4limbs/fesubDisplay.log b/src/Specific/montgomery64_2e198m17_4limbs/fesubDisplay.log deleted file mode 100644 index a70ca85ad..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fesubDisplay.log +++ /dev/null @@ -1,20 +0,0 @@ -λ x x0 : word64 * word64 * word64 * word64, -Interp-η -(λ var : Syntax.base_type → Type, - λ '(x8, x9, x7, x5, (x14, x15, x13, x11))%core, - uint64_t x17, uint8_t x18 = subborrow_u64(0x0, x5, x11); - uint64_t x20, uint8_t x21 = subborrow_u64(x18, x7, x13); - uint64_t x23, uint8_t x24 = subborrow_u64(x21, x9, x15); - uint64_t x26, uint8_t x27 = subborrow_u64(x24, x8, x14); - uint64_t x28 = cmovznz64(x27, 0x0, 0xffffffffffffffffL); - uint64_t x29 = (x28 & 0xffffffffffffffefL); - uint64_t x31, uint8_t x32 = addcarryx_u64(0x0, x17, x29); - uint64_t x33 = (x28 & 0xffffffffffffffffL); - uint64_t x35, uint8_t x36 = addcarryx_u64(x32, x20, x33); - uint64_t x37 = (x28 & 0xffffffffffffffffL); - uint64_t x39, uint8_t x40 = addcarryx_u64(x36, x23, x37); - uint8_t x41 = ((uint8_t)x28 & 0x3f); - uint64_t x43, uint8_t _ = addcarryx_u64(x40, x26, x41); - (Return x43, Return x39, Return x35, Return x31)) -(x, x0)%core - : word64 * word64 * word64 * word64 → word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t) diff --git a/src/Specific/montgomery64_2e198m17_4limbs/fesubDisplay.v b/src/Specific/montgomery64_2e198m17_4limbs/fesubDisplay.v deleted file mode 100644 index 016486afc..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/fesubDisplay.v +++ /dev/null @@ -1,4 +0,0 @@ -Require Import Crypto.Specific.montgomery64_2e198m17_4limbs.fesub. -Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon. - -Check display sub. diff --git a/src/Specific/montgomery64_2e198m17_4limbs/py_interpreter.sh b/src/Specific/montgomery64_2e198m17_4limbs/py_interpreter.sh deleted file mode 100755 index 4e637fbc6..000000000 --- a/src/Specific/montgomery64_2e198m17_4limbs/py_interpreter.sh +++ /dev/null @@ -1,4 +0,0 @@ -#!/bin/sh -set -eu - -/usr/bin/env python3 "$@" -Dq='2**198 - 17' -Dmodulus_bytes='64' -Da24='121665' |