aboutsummaryrefslogtreecommitdiff
path: root/src/Specific/montgomery32_2e336m3_11limbs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Specific/montgomery32_2e336m3_11limbs')
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/CurveParameters.v39
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/Synthesis.v9
-rwxr-xr-xsrc/Specific/montgomery32_2e336m3_11limbs/compiler.sh4
-rwxr-xr-xsrc/Specific/montgomery32_2e336m3_11limbs/compilerxx.sh4
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/feadd.c70
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/feadd.v14
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/feaddDisplay.log41
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/feaddDisplay.v4
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/femul.v14
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/femulDisplay.v4
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/fenz.c25
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/fenz.v16
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/fenzDisplay.log17
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/fenzDisplay.v4
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/feopp.v14
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/feoppDisplay.v4
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/fesquare.c5
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/fesub.v14
-rw-r--r--src/Specific/montgomery32_2e336m3_11limbs/fesubDisplay.v4
-rwxr-xr-xsrc/Specific/montgomery32_2e336m3_11limbs/py_interpreter.sh4
20 files changed, 0 insertions, 310 deletions
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/CurveParameters.v b/src/Specific/montgomery32_2e336m3_11limbs/CurveParameters.v
deleted file mode 100644
index a03d11c28..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/CurveParameters.v
+++ /dev/null
@@ -1,39 +0,0 @@
-Require Import Crypto.Specific.Framework.RawCurveParameters.
-Require Import Crypto.Util.LetIn.
-
-(***
-Modulus : 2^336 - 3
-Base: 32
-***)
-
-Definition curve : CurveParameters :=
- {|
- sz := 11%nat;
- base := 32;
- bitwidth := 32;
- s := 2^336;
- c := [(1, 3)];
- 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_2e336m3_11limbs/Synthesis.v b/src/Specific/montgomery32_2e336m3_11limbs/Synthesis.v
deleted file mode 100644
index 21dd2d917..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/Synthesis.v
+++ /dev/null
@@ -1,9 +0,0 @@
-Require Import Crypto.Specific.Framework.SynthesisFramework.
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.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_2e336m3_11limbs/compiler.sh b/src/Specific/montgomery32_2e336m3_11limbs/compiler.sh
deleted file mode 100755
index cec08f58c..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/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,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,32,32,32,32}' -Dmodulus_array='{0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xfd}' -Dmodulus_bytes_val='42' -Dmodulus_limbs='11' -Dq_mpz='(1_mpz<<336) - 3' "$@"
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/compilerxx.sh b/src/Specific/montgomery32_2e336m3_11limbs/compilerxx.sh
deleted file mode 100755
index 10257d4d8..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/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,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,32,32,32,32}' -Dmodulus_array='{0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xfd}' -Dmodulus_bytes_val='42' -Dmodulus_limbs='11' -Dq_mpz='(1_mpz<<336) - 3' "$@"
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/feadd.c b/src/Specific/montgomery32_2e336m3_11limbs/feadd.c
deleted file mode 100644
index d78f51b80..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/feadd.c
+++ /dev/null
@@ -1,70 +0,0 @@
-static void feadd(uint32_t out[11], const uint32_t in1[11], const uint32_t in2[11]) {
- { const uint32_t x22 = in1[10];
- { const uint32_t x23 = in1[9];
- { const uint32_t x21 = in1[8];
- { const uint32_t x19 = in1[7];
- { const uint32_t x17 = 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 x42 = in2[10];
- { const uint32_t x43 = in2[9];
- { const uint32_t x41 = in2[8];
- { const uint32_t x39 = in2[7];
- { const uint32_t x37 = in2[6];
- { const uint32_t x35 = in2[5];
- { const uint32_t x33 = in2[4];
- { const uint32_t x31 = in2[3];
- { const uint32_t x29 = in2[2];
- { const uint32_t x27 = in2[1];
- { const uint32_t x25 = in2[0];
- { uint32_t x45; uint8_t x46 = _addcarryx_u32(0x0, x5, x25, &x45);
- { uint32_t x48; uint8_t x49 = _addcarryx_u32(x46, x7, x27, &x48);
- { uint32_t x51; uint8_t x52 = _addcarryx_u32(x49, x9, x29, &x51);
- { uint32_t x54; uint8_t x55 = _addcarryx_u32(x52, x11, x31, &x54);
- { uint32_t x57; uint8_t x58 = _addcarryx_u32(x55, x13, x33, &x57);
- { uint32_t x60; uint8_t x61 = _addcarryx_u32(x58, x15, x35, &x60);
- { uint32_t x63; uint8_t x64 = _addcarryx_u32(x61, x17, x37, &x63);
- { uint32_t x66; uint8_t x67 = _addcarryx_u32(x64, x19, x39, &x66);
- { uint32_t x69; uint8_t x70 = _addcarryx_u32(x67, x21, x41, &x69);
- { uint32_t x72; uint8_t x73 = _addcarryx_u32(x70, x23, x43, &x72);
- { uint32_t x75; uint8_t x76 = _addcarryx_u32(x73, x22, x42, &x75);
- { uint32_t x78; uint8_t x79 = _subborrow_u32(0x0, x45, 0xfffffffd, &x78);
- { uint32_t x81; uint8_t x82 = _subborrow_u32(x79, x48, 0xffffffff, &x81);
- { uint32_t x84; uint8_t x85 = _subborrow_u32(x82, x51, 0xffffffff, &x84);
- { uint32_t x87; uint8_t x88 = _subborrow_u32(x85, x54, 0xffffffff, &x87);
- { uint32_t x90; uint8_t x91 = _subborrow_u32(x88, x57, 0xffffffff, &x90);
- { uint32_t x93; uint8_t x94 = _subborrow_u32(x91, x60, 0xffffffff, &x93);
- { uint32_t x96; uint8_t x97 = _subborrow_u32(x94, x63, 0xffffffff, &x96);
- { uint32_t x99; uint8_t x100 = _subborrow_u32(x97, x66, 0xffffffff, &x99);
- { uint32_t x102; uint8_t x103 = _subborrow_u32(x100, x69, 0xffffffff, &x102);
- { uint32_t x105; uint8_t x106 = _subborrow_u32(x103, x72, 0xffffffff, &x105);
- { uint32_t x108; uint8_t x109 = _subborrow_u32(x106, x75, 0xffff, &x108);
- { uint32_t _; uint8_t x112 = _subborrow_u32(x109, x76, 0x0, &_);
- { uint32_t x113 = cmovznz32(x112, x108, x75);
- { uint32_t x114 = cmovznz32(x112, x105, x72);
- { uint32_t x115 = cmovznz32(x112, x102, x69);
- { uint32_t x116 = cmovznz32(x112, x99, x66);
- { uint32_t x117 = cmovznz32(x112, x96, x63);
- { uint32_t x118 = cmovznz32(x112, x93, x60);
- { uint32_t x119 = cmovznz32(x112, x90, x57);
- { uint32_t x120 = cmovznz32(x112, x87, x54);
- { uint32_t x121 = cmovznz32(x112, x84, x51);
- { uint32_t x122 = cmovznz32(x112, x81, x48);
- { uint32_t x123 = cmovznz32(x112, x78, x45);
- out[0] = x123;
- out[1] = x122;
- out[2] = x121;
- out[3] = x120;
- out[4] = x119;
- out[5] = x118;
- out[6] = x117;
- out[7] = x116;
- out[8] = x115;
- out[9] = x114;
- out[10] = x113;
- }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-}
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/feadd.v b/src/Specific/montgomery32_2e336m3_11limbs/feadd.v
deleted file mode 100644
index 3c374f5a4..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/feadd.v
+++ /dev/null
@@ -1,14 +0,0 @@
-Require Import Crypto.Arithmetic.PrimeFieldTheorems.
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.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_2e336m3_11limbs/feaddDisplay.log b/src/Specific/montgomery32_2e336m3_11limbs/feaddDisplay.log
deleted file mode 100644
index fffeb4702..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/feaddDisplay.log
+++ /dev/null
@@ -1,41 +0,0 @@
-λ x x0 : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
-Interp-η
-(λ var : Syntax.base_type → Type,
- λ '(x22, x23, x21, x19, x17, x15, x13, x11, x9, x7, x5, (x42, x43, x41, x39, x37, x35, x33, x31, x29, x27, x25))%core,
- uint32_t x45, uint8_t x46 = addcarryx_u32(0x0, x5, x25);
- uint32_t x48, uint8_t x49 = addcarryx_u32(x46, x7, x27);
- uint32_t x51, uint8_t x52 = addcarryx_u32(x49, x9, x29);
- uint32_t x54, uint8_t x55 = addcarryx_u32(x52, x11, x31);
- uint32_t x57, uint8_t x58 = addcarryx_u32(x55, x13, x33);
- uint32_t x60, uint8_t x61 = addcarryx_u32(x58, x15, x35);
- uint32_t x63, uint8_t x64 = addcarryx_u32(x61, x17, x37);
- uint32_t x66, uint8_t x67 = addcarryx_u32(x64, x19, x39);
- uint32_t x69, uint8_t x70 = addcarryx_u32(x67, x21, x41);
- uint32_t x72, uint8_t x73 = addcarryx_u32(x70, x23, x43);
- uint32_t x75, uint8_t x76 = addcarryx_u32(x73, x22, x42);
- uint32_t x78, uint8_t x79 = subborrow_u32(0x0, x45, 0xfffffffd);
- uint32_t x81, uint8_t x82 = subborrow_u32(x79, x48, 0xffffffff);
- uint32_t x84, uint8_t x85 = subborrow_u32(x82, x51, 0xffffffff);
- uint32_t x87, uint8_t x88 = subborrow_u32(x85, x54, 0xffffffff);
- uint32_t x90, uint8_t x91 = subborrow_u32(x88, x57, 0xffffffff);
- uint32_t x93, uint8_t x94 = subborrow_u32(x91, x60, 0xffffffff);
- uint32_t x96, uint8_t x97 = subborrow_u32(x94, x63, 0xffffffff);
- uint32_t x99, uint8_t x100 = subborrow_u32(x97, x66, 0xffffffff);
- uint32_t x102, uint8_t x103 = subborrow_u32(x100, x69, 0xffffffff);
- uint32_t x105, uint8_t x106 = subborrow_u32(x103, x72, 0xffffffff);
- uint32_t x108, uint8_t x109 = subborrow_u32(x106, x75, 0xffff);
- uint32_t _, uint8_t x112 = subborrow_u32(x109, x76, 0x0);
- uint32_t x113 = cmovznz32(x112, x108, x75);
- uint32_t x114 = cmovznz32(x112, x105, x72);
- uint32_t x115 = cmovznz32(x112, x102, x69);
- uint32_t x116 = cmovznz32(x112, x99, x66);
- uint32_t x117 = cmovznz32(x112, x96, x63);
- uint32_t x118 = cmovznz32(x112, x93, x60);
- uint32_t x119 = cmovznz32(x112, x90, x57);
- uint32_t x120 = cmovznz32(x112, x87, x54);
- uint32_t x121 = cmovznz32(x112, x84, x51);
- uint32_t x122 = cmovznz32(x112, x81, x48);
- uint32_t x123 = cmovznz32(x112, x78, x45);
- return (x113, x114, x115, x116, x117, x118, x119, x120, x121, x122, x123))
-(x, x0)%core
- : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * 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 * uint32_t * uint32_t * uint32_t * uint32_t)
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/feaddDisplay.v b/src/Specific/montgomery32_2e336m3_11limbs/feaddDisplay.v
deleted file mode 100644
index 212abe903..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/feaddDisplay.v
+++ /dev/null
@@ -1,4 +0,0 @@
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.feadd.
-Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon.
-
-Check display add.
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/femul.v b/src/Specific/montgomery32_2e336m3_11limbs/femul.v
deleted file mode 100644
index a6f82db7a..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/femul.v
+++ /dev/null
@@ -1,14 +0,0 @@
-Require Import Crypto.Arithmetic.PrimeFieldTheorems.
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.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_2e336m3_11limbs/femulDisplay.v b/src/Specific/montgomery32_2e336m3_11limbs/femulDisplay.v
deleted file mode 100644
index 535c664ae..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/femulDisplay.v
+++ /dev/null
@@ -1,4 +0,0 @@
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.femul.
-Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon.
-
-Check display mul.
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/fenz.c b/src/Specific/montgomery32_2e336m3_11limbs/fenz.c
deleted file mode 100644
index d962eda51..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/fenz.c
+++ /dev/null
@@ -1,25 +0,0 @@
-static void fenz(ReturnType uint32_t out[1], const uint32_t in1[11]) {
- { const uint32_t x19 = in1[10];
- { const uint32_t x20 = in1[9];
- { const uint32_t x18 = in1[8];
- { const uint32_t x16 = in1[7];
- { const uint32_t x14 = 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 x21 = (x20 | x19);
- { uint32_t x22 = (x18 | x21);
- { uint32_t x23 = (x16 | x22);
- { uint32_t x24 = (x14 | x23);
- { uint32_t x25 = (x12 | x24);
- { uint32_t x26 = (x10 | x25);
- { uint32_t x27 = (x8 | x26);
- { uint32_t x28 = (x6 | x27);
- { uint32_t x29 = (x4 | x28);
- { uint32_t x30 = (x2 | x29);
- out[0] = x30;
- }}}}}}}}}}}}}}}}}}}}}
-}
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/fenz.v b/src/Specific/montgomery32_2e336m3_11limbs/fenz.v
deleted file mode 100644
index 4b2aeb976..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/fenz.v
+++ /dev/null
@@ -1,16 +0,0 @@
-Require Import Coq.ZArith.ZArith.
-Require Import Crypto.Arithmetic.PrimeFieldTheorems.
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.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_2e336m3_11limbs/fenzDisplay.log b/src/Specific/montgomery32_2e336m3_11limbs/fenzDisplay.log
deleted file mode 100644
index 4c54f68e5..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/fenzDisplay.log
+++ /dev/null
@@ -1,17 +0,0 @@
-λ x : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
-Interp-η
-(λ var : Syntax.base_type → Type,
- λ '(x19, x20, x18, x16, x14, x12, x10, x8, x6, x4, x2)%core,
- uint32_t x21 = (x20 | x19);
- uint32_t x22 = (x18 | x21);
- uint32_t x23 = (x16 | x22);
- uint32_t x24 = (x14 | x23);
- uint32_t x25 = (x12 | x24);
- uint32_t x26 = (x10 | x25);
- uint32_t x27 = (x8 | x26);
- uint32_t x28 = (x6 | x27);
- uint32_t x29 = (x4 | x28);
- uint32_t x30 = (x2 | x29);
- return x30)
-x
- : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType uint32_t
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/fenzDisplay.v b/src/Specific/montgomery32_2e336m3_11limbs/fenzDisplay.v
deleted file mode 100644
index b09ceff76..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/fenzDisplay.v
+++ /dev/null
@@ -1,4 +0,0 @@
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.fenz.
-Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon.
-
-Check display nonzero.
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/feopp.v b/src/Specific/montgomery32_2e336m3_11limbs/feopp.v
deleted file mode 100644
index b26c2ecc0..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/feopp.v
+++ /dev/null
@@ -1,14 +0,0 @@
-Require Import Crypto.Arithmetic.PrimeFieldTheorems.
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.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_2e336m3_11limbs/feoppDisplay.v b/src/Specific/montgomery32_2e336m3_11limbs/feoppDisplay.v
deleted file mode 100644
index 54c141533..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/feoppDisplay.v
+++ /dev/null
@@ -1,4 +0,0 @@
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.feopp.
-Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon.
-
-Check display opp.
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/fesquare.c b/src/Specific/montgomery32_2e336m3_11limbs/fesquare.c
deleted file mode 100644
index e3345edfe..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/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_2e336m3_11limbs/fesub.v b/src/Specific/montgomery32_2e336m3_11limbs/fesub.v
deleted file mode 100644
index 834a4fcbf..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/fesub.v
+++ /dev/null
@@ -1,14 +0,0 @@
-Require Import Crypto.Arithmetic.PrimeFieldTheorems.
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.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_2e336m3_11limbs/fesubDisplay.v b/src/Specific/montgomery32_2e336m3_11limbs/fesubDisplay.v
deleted file mode 100644
index e0d814d02..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/fesubDisplay.v
+++ /dev/null
@@ -1,4 +0,0 @@
-Require Import Crypto.Specific.montgomery32_2e336m3_11limbs.fesub.
-Require Import Crypto.Specific.Framework.IntegrationTestDisplayCommon.
-
-Check display sub.
diff --git a/src/Specific/montgomery32_2e336m3_11limbs/py_interpreter.sh b/src/Specific/montgomery32_2e336m3_11limbs/py_interpreter.sh
deleted file mode 100755
index 6ab4b54d5..000000000
--- a/src/Specific/montgomery32_2e336m3_11limbs/py_interpreter.sh
+++ /dev/null
@@ -1,4 +0,0 @@
-#!/bin/sh
-set -eu
-
-/usr/bin/env python3 "$@" -Dq='2**336 - 3' -Dmodulus_bytes='32' -Da24='121665'