Update display logs and c files

12 files changed, 495 insertions, 0 deletions

diff --git a/src/Specific/montgomery32_2e383m187_12limbs/feadd.c b/src/Specific/montgomery32_2e383m187_12limbs/feadd.c
new file mode 100644
index 000000000..8bd80a3bf
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m187_12limbs/feadd.c
@@ -0,0 +1,76 @@
+static void feadd(uint32_t out[12], const uint32_t in1[12], const uint32_t in2[12]) {
+  { const uint32_t x24 = in1[11];
+  { const uint32_t x25 = 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 x46 = in2[11];
+  { const uint32_t x47 = in2[10];
+  { const uint32_t x45 = in2[9];
+  { const uint32_t x43 = in2[8];
+  { const uint32_t x41 = in2[7];
+  { const uint32_t x39 = in2[6];
+  { const uint32_t x37 = in2[5];
+  { const uint32_t x35 = in2[4];
+  { const uint32_t x33 = in2[3];
+  { const uint32_t x31 = in2[2];
+  { const uint32_t x29 = in2[1];
+  { const uint32_t x27 = in2[0];
+  { uint32_t x49; uint8_t x50 = _addcarryx_u32(0x0, x5, x27, &x49);
+  { uint32_t x52; uint8_t x53 = _addcarryx_u32(x50, x7, x29, &x52);
+  { uint32_t x55; uint8_t x56 = _addcarryx_u32(x53, x9, x31, &x55);
+  { uint32_t x58; uint8_t x59 = _addcarryx_u32(x56, x11, x33, &x58);
+  { uint32_t x61; uint8_t x62 = _addcarryx_u32(x59, x13, x35, &x61);
+  { uint32_t x64; uint8_t x65 = _addcarryx_u32(x62, x15, x37, &x64);
+  { uint32_t x67; uint8_t x68 = _addcarryx_u32(x65, x17, x39, &x67);
+  { uint32_t x70; uint8_t x71 = _addcarryx_u32(x68, x19, x41, &x70);
+  { uint32_t x73; uint8_t x74 = _addcarryx_u32(x71, x21, x43, &x73);
+  { uint32_t x76; uint8_t x77 = _addcarryx_u32(x74, x23, x45, &x76);
+  { uint32_t x79; uint8_t x80 = _addcarryx_u32(x77, x25, x47, &x79);
+  { uint32_t x82; uint8_t x83 = _addcarryx_u32(x80, x24, x46, &x82);
+  { uint32_t x85; uint8_t x86 = _subborrow_u32(0x0, x49, 0xffffff45, &x85);
+  { uint32_t x88; uint8_t x89 = _subborrow_u32(x86, x52, 0xffffffff, &x88);
+  { uint32_t x91; uint8_t x92 = _subborrow_u32(x89, x55, 0xffffffff, &x91);
+  { uint32_t x94; uint8_t x95 = _subborrow_u32(x92, x58, 0xffffffff, &x94);
+  { uint32_t x97; uint8_t x98 = _subborrow_u32(x95, x61, 0xffffffff, &x97);
+  { uint32_t x100; uint8_t x101 = _subborrow_u32(x98, x64, 0xffffffff, &x100);
+  { uint32_t x103; uint8_t x104 = _subborrow_u32(x101, x67, 0xffffffff, &x103);
+  { uint32_t x106; uint8_t x107 = _subborrow_u32(x104, x70, 0xffffffff, &x106);
+  { uint32_t x109; uint8_t x110 = _subborrow_u32(x107, x73, 0xffffffff, &x109);
+  { uint32_t x112; uint8_t x113 = _subborrow_u32(x110, x76, 0xffffffff, &x112);
+  { uint32_t x115; uint8_t x116 = _subborrow_u32(x113, x79, 0xffffffff, &x115);
+  { uint32_t x118; uint8_t x119 = _subborrow_u32(x116, x82, 0x7fffffff, &x118);
+  { uint32_t _; uint8_t x122 = _subborrow_u32(x119, x83, 0x0, &_);
+  { uint32_t x123 = cmovznz32(x122, x118, x82);
+  { uint32_t x124 = cmovznz32(x122, x115, x79);
+  { uint32_t x125 = cmovznz32(x122, x112, x76);
+  { uint32_t x126 = cmovznz32(x122, x109, x73);
+  { uint32_t x127 = cmovznz32(x122, x106, x70);
+  { uint32_t x128 = cmovznz32(x122, x103, x67);
+  { uint32_t x129 = cmovznz32(x122, x100, x64);
+  { uint32_t x130 = cmovznz32(x122, x97, x61);
+  { uint32_t x131 = cmovznz32(x122, x94, x58);
+  { uint32_t x132 = cmovznz32(x122, x91, x55);
+  { uint32_t x133 = cmovznz32(x122, x88, x52);
+  { uint32_t x134 = cmovznz32(x122, x85, x49);
+  out[0] = x134;
+  out[1] = x133;
+  out[2] = x132;
+  out[3] = x131;
+  out[4] = x130;
+  out[5] = x129;
+  out[6] = x128;
+  out[7] = x127;
+  out[8] = x126;
+  out[9] = x125;
+  out[10] = x124;
+  out[11] = x123;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/montgomery32_2e383m187_12limbs/feaddDisplay.log b/src/Specific/montgomery32_2e383m187_12limbs/feaddDisplay.log
new file mode 100644
index 000000000..b2077f6d1
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m187_12limbs/feaddDisplay.log
@@ -0,0 +1,44 @@
+λ x x0 : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x24, x25, x23, x21, x19, x17, x15, x13, x11, x9, x7, x5, (x46, x47, x45, x43, x41, x39, x37, x35, x33, x31, x29, x27))%core,
+ uint32_t x49, uint8_t x50 = addcarryx_u32(0x0, x5, x27);
+ uint32_t x52, uint8_t x53 = addcarryx_u32(x50, x7, x29);
+ uint32_t x55, uint8_t x56 = addcarryx_u32(x53, x9, x31);
+ uint32_t x58, uint8_t x59 = addcarryx_u32(x56, x11, x33);
+ uint32_t x61, uint8_t x62 = addcarryx_u32(x59, x13, x35);
+ uint32_t x64, uint8_t x65 = addcarryx_u32(x62, x15, x37);
+ uint32_t x67, uint8_t x68 = addcarryx_u32(x65, x17, x39);
+ uint32_t x70, uint8_t x71 = addcarryx_u32(x68, x19, x41);
+ uint32_t x73, uint8_t x74 = addcarryx_u32(x71, x21, x43);
+ uint32_t x76, uint8_t x77 = addcarryx_u32(x74, x23, x45);
+ uint32_t x79, uint8_t x80 = addcarryx_u32(x77, x25, x47);
+ uint32_t x82, uint8_t x83 = addcarryx_u32(x80, x24, x46);
+ uint32_t x85, uint8_t x86 = subborrow_u32(0x0, x49, 0xffffff45);
+ uint32_t x88, uint8_t x89 = subborrow_u32(x86, x52, 0xffffffff);
+ uint32_t x91, uint8_t x92 = subborrow_u32(x89, x55, 0xffffffff);
+ uint32_t x94, uint8_t x95 = subborrow_u32(x92, x58, 0xffffffff);
+ uint32_t x97, uint8_t x98 = subborrow_u32(x95, x61, 0xffffffff);
+ uint32_t x100, uint8_t x101 = subborrow_u32(x98, x64, 0xffffffff);
+ uint32_t x103, uint8_t x104 = subborrow_u32(x101, x67, 0xffffffff);
+ uint32_t x106, uint8_t x107 = subborrow_u32(x104, x70, 0xffffffff);
+ uint32_t x109, uint8_t x110 = subborrow_u32(x107, x73, 0xffffffff);
+ uint32_t x112, uint8_t x113 = subborrow_u32(x110, x76, 0xffffffff);
+ uint32_t x115, uint8_t x116 = subborrow_u32(x113, x79, 0xffffffff);
+ uint32_t x118, uint8_t x119 = subborrow_u32(x116, x82, 0x7fffffff);
+ uint32_t _, uint8_t x122 = subborrow_u32(x119, x83, 0x0);
+ uint32_t x123 = cmovznz32(x122, x118, x82);
+ uint32_t x124 = cmovznz32(x122, x115, x79);
+ uint32_t x125 = cmovznz32(x122, x112, x76);
+ uint32_t x126 = cmovznz32(x122, x109, x73);
+ uint32_t x127 = cmovznz32(x122, x106, x70);
+ uint32_t x128 = cmovznz32(x122, x103, x67);
+ uint32_t x129 = cmovznz32(x122, x100, x64);
+ uint32_t x130 = cmovznz32(x122, x97, x61);
+ uint32_t x131 = cmovznz32(x122, x94, x58);
+ uint32_t x132 = cmovznz32(x122, x91, x55);
+ uint32_t x133 = cmovznz32(x122, x88, x52);
+ uint32_t x134 = cmovznz32(x122, x85, x49);
+ return (x123, x124, x125, x126, x127, x128, x129, x130, x131, x132, x133, x134))
+(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 * 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 * uint32_t)
diff --git a/src/Specific/montgomery32_2e383m187_12limbs/fenz.c b/src/Specific/montgomery32_2e383m187_12limbs/fenz.c
new file mode 100644
index 000000000..61ca36c29
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m187_12limbs/fenz.c
@@ -0,0 +1,27 @@
+static void fenz(ReturnType uint32_t out[1], const uint32_t in1[12]) {
+  { const uint32_t x21 = in1[11];
+  { const uint32_t x22 = 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 x23 = (x22 | x21);
+  { uint32_t x24 = (x20 | x23);
+  { uint32_t x25 = (x18 | x24);
+  { uint32_t x26 = (x16 | x25);
+  { uint32_t x27 = (x14 | x26);
+  { uint32_t x28 = (x12 | x27);
+  { uint32_t x29 = (x10 | x28);
+  { uint32_t x30 = (x8 | x29);
+  { uint32_t x31 = (x6 | x30);
+  { uint32_t x32 = (x4 | x31);
+  { uint32_t x33 = (x2 | x32);
+  out[0] = x33;
+  }}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/montgomery32_2e383m187_12limbs/fenzDisplay.log b/src/Specific/montgomery32_2e383m187_12limbs/fenzDisplay.log
new file mode 100644
index 000000000..7a5f016e0
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m187_12limbs/fenzDisplay.log
@@ -0,0 +1,18 @@
+λ x : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x21, x22, x20, x18, x16, x14, x12, x10, x8, x6, x4, x2)%core,
+ uint32_t x23 = (x22 | x21);
+ uint32_t x24 = (x20 | x23);
+ uint32_t x25 = (x18 | x24);
+ uint32_t x26 = (x16 | x25);
+ uint32_t x27 = (x14 | x26);
+ uint32_t x28 = (x12 | x27);
+ uint32_t x29 = (x10 | x28);
+ uint32_t x30 = (x8 | x29);
+ uint32_t x31 = (x6 | x30);
+ uint32_t x32 = (x4 | x31);
+ uint32_t x33 = (x2 | x32);
+ return x33)
+x
+     : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType uint32_t
diff --git a/src/Specific/montgomery32_2e383m31_12limbs/feadd.c b/src/Specific/montgomery32_2e383m31_12limbs/feadd.c
new file mode 100644
index 000000000..9a542cca1
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m31_12limbs/feadd.c
@@ -0,0 +1,76 @@
+static void feadd(uint32_t out[12], const uint32_t in1[12], const uint32_t in2[12]) {
+  { const uint32_t x24 = in1[11];
+  { const uint32_t x25 = 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 x46 = in2[11];
+  { const uint32_t x47 = in2[10];
+  { const uint32_t x45 = in2[9];
+  { const uint32_t x43 = in2[8];
+  { const uint32_t x41 = in2[7];
+  { const uint32_t x39 = in2[6];
+  { const uint32_t x37 = in2[5];
+  { const uint32_t x35 = in2[4];
+  { const uint32_t x33 = in2[3];
+  { const uint32_t x31 = in2[2];
+  { const uint32_t x29 = in2[1];
+  { const uint32_t x27 = in2[0];
+  { uint32_t x49; uint8_t x50 = _addcarryx_u32(0x0, x5, x27, &x49);
+  { uint32_t x52; uint8_t x53 = _addcarryx_u32(x50, x7, x29, &x52);
+  { uint32_t x55; uint8_t x56 = _addcarryx_u32(x53, x9, x31, &x55);
+  { uint32_t x58; uint8_t x59 = _addcarryx_u32(x56, x11, x33, &x58);
+  { uint32_t x61; uint8_t x62 = _addcarryx_u32(x59, x13, x35, &x61);
+  { uint32_t x64; uint8_t x65 = _addcarryx_u32(x62, x15, x37, &x64);
+  { uint32_t x67; uint8_t x68 = _addcarryx_u32(x65, x17, x39, &x67);
+  { uint32_t x70; uint8_t x71 = _addcarryx_u32(x68, x19, x41, &x70);
+  { uint32_t x73; uint8_t x74 = _addcarryx_u32(x71, x21, x43, &x73);
+  { uint32_t x76; uint8_t x77 = _addcarryx_u32(x74, x23, x45, &x76);
+  { uint32_t x79; uint8_t x80 = _addcarryx_u32(x77, x25, x47, &x79);
+  { uint32_t x82; uint8_t x83 = _addcarryx_u32(x80, x24, x46, &x82);
+  { uint32_t x85; uint8_t x86 = _subborrow_u32(0x0, x49, 0xffffffe1, &x85);
+  { uint32_t x88; uint8_t x89 = _subborrow_u32(x86, x52, 0xffffffff, &x88);
+  { uint32_t x91; uint8_t x92 = _subborrow_u32(x89, x55, 0xffffffff, &x91);
+  { uint32_t x94; uint8_t x95 = _subborrow_u32(x92, x58, 0xffffffff, &x94);
+  { uint32_t x97; uint8_t x98 = _subborrow_u32(x95, x61, 0xffffffff, &x97);
+  { uint32_t x100; uint8_t x101 = _subborrow_u32(x98, x64, 0xffffffff, &x100);
+  { uint32_t x103; uint8_t x104 = _subborrow_u32(x101, x67, 0xffffffff, &x103);
+  { uint32_t x106; uint8_t x107 = _subborrow_u32(x104, x70, 0xffffffff, &x106);
+  { uint32_t x109; uint8_t x110 = _subborrow_u32(x107, x73, 0xffffffff, &x109);
+  { uint32_t x112; uint8_t x113 = _subborrow_u32(x110, x76, 0xffffffff, &x112);
+  { uint32_t x115; uint8_t x116 = _subborrow_u32(x113, x79, 0xffffffff, &x115);
+  { uint32_t x118; uint8_t x119 = _subborrow_u32(x116, x82, 0x7fffffff, &x118);
+  { uint32_t _; uint8_t x122 = _subborrow_u32(x119, x83, 0x0, &_);
+  { uint32_t x123 = cmovznz32(x122, x118, x82);
+  { uint32_t x124 = cmovznz32(x122, x115, x79);
+  { uint32_t x125 = cmovznz32(x122, x112, x76);
+  { uint32_t x126 = cmovznz32(x122, x109, x73);
+  { uint32_t x127 = cmovznz32(x122, x106, x70);
+  { uint32_t x128 = cmovznz32(x122, x103, x67);
+  { uint32_t x129 = cmovznz32(x122, x100, x64);
+  { uint32_t x130 = cmovznz32(x122, x97, x61);
+  { uint32_t x131 = cmovznz32(x122, x94, x58);
+  { uint32_t x132 = cmovznz32(x122, x91, x55);
+  { uint32_t x133 = cmovznz32(x122, x88, x52);
+  { uint32_t x134 = cmovznz32(x122, x85, x49);
+  out[0] = x134;
+  out[1] = x133;
+  out[2] = x132;
+  out[3] = x131;
+  out[4] = x130;
+  out[5] = x129;
+  out[6] = x128;
+  out[7] = x127;
+  out[8] = x126;
+  out[9] = x125;
+  out[10] = x124;
+  out[11] = x123;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/montgomery32_2e383m31_12limbs/feaddDisplay.log b/src/Specific/montgomery32_2e383m31_12limbs/feaddDisplay.log
new file mode 100644
index 000000000..d8d6ae3d8
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m31_12limbs/feaddDisplay.log
@@ -0,0 +1,44 @@
+λ x x0 : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x24, x25, x23, x21, x19, x17, x15, x13, x11, x9, x7, x5, (x46, x47, x45, x43, x41, x39, x37, x35, x33, x31, x29, x27))%core,
+ uint32_t x49, uint8_t x50 = addcarryx_u32(0x0, x5, x27);
+ uint32_t x52, uint8_t x53 = addcarryx_u32(x50, x7, x29);
+ uint32_t x55, uint8_t x56 = addcarryx_u32(x53, x9, x31);
+ uint32_t x58, uint8_t x59 = addcarryx_u32(x56, x11, x33);
+ uint32_t x61, uint8_t x62 = addcarryx_u32(x59, x13, x35);
+ uint32_t x64, uint8_t x65 = addcarryx_u32(x62, x15, x37);
+ uint32_t x67, uint8_t x68 = addcarryx_u32(x65, x17, x39);
+ uint32_t x70, uint8_t x71 = addcarryx_u32(x68, x19, x41);
+ uint32_t x73, uint8_t x74 = addcarryx_u32(x71, x21, x43);
+ uint32_t x76, uint8_t x77 = addcarryx_u32(x74, x23, x45);
+ uint32_t x79, uint8_t x80 = addcarryx_u32(x77, x25, x47);
+ uint32_t x82, uint8_t x83 = addcarryx_u32(x80, x24, x46);
+ uint32_t x85, uint8_t x86 = subborrow_u32(0x0, x49, 0xffffffe1);
+ uint32_t x88, uint8_t x89 = subborrow_u32(x86, x52, 0xffffffff);
+ uint32_t x91, uint8_t x92 = subborrow_u32(x89, x55, 0xffffffff);
+ uint32_t x94, uint8_t x95 = subborrow_u32(x92, x58, 0xffffffff);
+ uint32_t x97, uint8_t x98 = subborrow_u32(x95, x61, 0xffffffff);
+ uint32_t x100, uint8_t x101 = subborrow_u32(x98, x64, 0xffffffff);
+ uint32_t x103, uint8_t x104 = subborrow_u32(x101, x67, 0xffffffff);
+ uint32_t x106, uint8_t x107 = subborrow_u32(x104, x70, 0xffffffff);
+ uint32_t x109, uint8_t x110 = subborrow_u32(x107, x73, 0xffffffff);
+ uint32_t x112, uint8_t x113 = subborrow_u32(x110, x76, 0xffffffff);
+ uint32_t x115, uint8_t x116 = subborrow_u32(x113, x79, 0xffffffff);
+ uint32_t x118, uint8_t x119 = subborrow_u32(x116, x82, 0x7fffffff);
+ uint32_t _, uint8_t x122 = subborrow_u32(x119, x83, 0x0);
+ uint32_t x123 = cmovznz32(x122, x118, x82);
+ uint32_t x124 = cmovznz32(x122, x115, x79);
+ uint32_t x125 = cmovznz32(x122, x112, x76);
+ uint32_t x126 = cmovznz32(x122, x109, x73);
+ uint32_t x127 = cmovznz32(x122, x106, x70);
+ uint32_t x128 = cmovznz32(x122, x103, x67);
+ uint32_t x129 = cmovznz32(x122, x100, x64);
+ uint32_t x130 = cmovznz32(x122, x97, x61);
+ uint32_t x131 = cmovznz32(x122, x94, x58);
+ uint32_t x132 = cmovznz32(x122, x91, x55);
+ uint32_t x133 = cmovznz32(x122, x88, x52);
+ uint32_t x134 = cmovznz32(x122, x85, x49);
+ return (x123, x124, x125, x126, x127, x128, x129, x130, x131, x132, x133, x134))
+(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 * 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 * uint32_t)
diff --git a/src/Specific/montgomery32_2e383m31_12limbs/fenz.c b/src/Specific/montgomery32_2e383m31_12limbs/fenz.c
new file mode 100644
index 000000000..61ca36c29
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m31_12limbs/fenz.c
@@ -0,0 +1,27 @@
+static void fenz(ReturnType uint32_t out[1], const uint32_t in1[12]) {
+  { const uint32_t x21 = in1[11];
+  { const uint32_t x22 = 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 x23 = (x22 | x21);
+  { uint32_t x24 = (x20 | x23);
+  { uint32_t x25 = (x18 | x24);
+  { uint32_t x26 = (x16 | x25);
+  { uint32_t x27 = (x14 | x26);
+  { uint32_t x28 = (x12 | x27);
+  { uint32_t x29 = (x10 | x28);
+  { uint32_t x30 = (x8 | x29);
+  { uint32_t x31 = (x6 | x30);
+  { uint32_t x32 = (x4 | x31);
+  { uint32_t x33 = (x2 | x32);
+  out[0] = x33;
+  }}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/montgomery32_2e383m31_12limbs/fenzDisplay.log b/src/Specific/montgomery32_2e383m31_12limbs/fenzDisplay.log
new file mode 100644
index 000000000..7a5f016e0
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m31_12limbs/fenzDisplay.log
@@ -0,0 +1,18 @@
+λ x : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x21, x22, x20, x18, x16, x14, x12, x10, x8, x6, x4, x2)%core,
+ uint32_t x23 = (x22 | x21);
+ uint32_t x24 = (x20 | x23);
+ uint32_t x25 = (x18 | x24);
+ uint32_t x26 = (x16 | x25);
+ uint32_t x27 = (x14 | x26);
+ uint32_t x28 = (x12 | x27);
+ uint32_t x29 = (x10 | x28);
+ uint32_t x30 = (x8 | x29);
+ uint32_t x31 = (x6 | x30);
+ uint32_t x32 = (x4 | x31);
+ uint32_t x33 = (x2 | x32);
+ return x33)
+x
+     : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType uint32_t
diff --git a/src/Specific/montgomery32_2e383m421_12limbs/feadd.c b/src/Specific/montgomery32_2e383m421_12limbs/feadd.c
new file mode 100644
index 000000000..20a590121
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m421_12limbs/feadd.c
@@ -0,0 +1,76 @@
+static void feadd(uint32_t out[12], const uint32_t in1[12], const uint32_t in2[12]) {
+  { const uint32_t x24 = in1[11];
+  { const uint32_t x25 = 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 x46 = in2[11];
+  { const uint32_t x47 = in2[10];
+  { const uint32_t x45 = in2[9];
+  { const uint32_t x43 = in2[8];
+  { const uint32_t x41 = in2[7];
+  { const uint32_t x39 = in2[6];
+  { const uint32_t x37 = in2[5];
+  { const uint32_t x35 = in2[4];
+  { const uint32_t x33 = in2[3];
+  { const uint32_t x31 = in2[2];
+  { const uint32_t x29 = in2[1];
+  { const uint32_t x27 = in2[0];
+  { uint32_t x49; uint8_t x50 = _addcarryx_u32(0x0, x5, x27, &x49);
+  { uint32_t x52; uint8_t x53 = _addcarryx_u32(x50, x7, x29, &x52);
+  { uint32_t x55; uint8_t x56 = _addcarryx_u32(x53, x9, x31, &x55);
+  { uint32_t x58; uint8_t x59 = _addcarryx_u32(x56, x11, x33, &x58);
+  { uint32_t x61; uint8_t x62 = _addcarryx_u32(x59, x13, x35, &x61);
+  { uint32_t x64; uint8_t x65 = _addcarryx_u32(x62, x15, x37, &x64);
+  { uint32_t x67; uint8_t x68 = _addcarryx_u32(x65, x17, x39, &x67);
+  { uint32_t x70; uint8_t x71 = _addcarryx_u32(x68, x19, x41, &x70);
+  { uint32_t x73; uint8_t x74 = _addcarryx_u32(x71, x21, x43, &x73);
+  { uint32_t x76; uint8_t x77 = _addcarryx_u32(x74, x23, x45, &x76);
+  { uint32_t x79; uint8_t x80 = _addcarryx_u32(x77, x25, x47, &x79);
+  { uint32_t x82; uint8_t x83 = _addcarryx_u32(x80, x24, x46, &x82);
+  { uint32_t x85; uint8_t x86 = _subborrow_u32(0x0, x49, 0xfffffe5b, &x85);
+  { uint32_t x88; uint8_t x89 = _subborrow_u32(x86, x52, 0xffffffff, &x88);
+  { uint32_t x91; uint8_t x92 = _subborrow_u32(x89, x55, 0xffffffff, &x91);
+  { uint32_t x94; uint8_t x95 = _subborrow_u32(x92, x58, 0xffffffff, &x94);
+  { uint32_t x97; uint8_t x98 = _subborrow_u32(x95, x61, 0xffffffff, &x97);
+  { uint32_t x100; uint8_t x101 = _subborrow_u32(x98, x64, 0xffffffff, &x100);
+  { uint32_t x103; uint8_t x104 = _subborrow_u32(x101, x67, 0xffffffff, &x103);
+  { uint32_t x106; uint8_t x107 = _subborrow_u32(x104, x70, 0xffffffff, &x106);
+  { uint32_t x109; uint8_t x110 = _subborrow_u32(x107, x73, 0xffffffff, &x109);
+  { uint32_t x112; uint8_t x113 = _subborrow_u32(x110, x76, 0xffffffff, &x112);
+  { uint32_t x115; uint8_t x116 = _subborrow_u32(x113, x79, 0xffffffff, &x115);
+  { uint32_t x118; uint8_t x119 = _subborrow_u32(x116, x82, 0x7fffffff, &x118);
+  { uint32_t _; uint8_t x122 = _subborrow_u32(x119, x83, 0x0, &_);
+  { uint32_t x123 = cmovznz32(x122, x118, x82);
+  { uint32_t x124 = cmovznz32(x122, x115, x79);
+  { uint32_t x125 = cmovznz32(x122, x112, x76);
+  { uint32_t x126 = cmovznz32(x122, x109, x73);
+  { uint32_t x127 = cmovznz32(x122, x106, x70);
+  { uint32_t x128 = cmovznz32(x122, x103, x67);
+  { uint32_t x129 = cmovznz32(x122, x100, x64);
+  { uint32_t x130 = cmovznz32(x122, x97, x61);
+  { uint32_t x131 = cmovznz32(x122, x94, x58);
+  { uint32_t x132 = cmovznz32(x122, x91, x55);
+  { uint32_t x133 = cmovznz32(x122, x88, x52);
+  { uint32_t x134 = cmovznz32(x122, x85, x49);
+  out[0] = x134;
+  out[1] = x133;
+  out[2] = x132;
+  out[3] = x131;
+  out[4] = x130;
+  out[5] = x129;
+  out[6] = x128;
+  out[7] = x127;
+  out[8] = x126;
+  out[9] = x125;
+  out[10] = x124;
+  out[11] = x123;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/montgomery32_2e383m421_12limbs/feaddDisplay.log b/src/Specific/montgomery32_2e383m421_12limbs/feaddDisplay.log
new file mode 100644
index 000000000..21c18fb82
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m421_12limbs/feaddDisplay.log
@@ -0,0 +1,44 @@
+λ x x0 : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x24, x25, x23, x21, x19, x17, x15, x13, x11, x9, x7, x5, (x46, x47, x45, x43, x41, x39, x37, x35, x33, x31, x29, x27))%core,
+ uint32_t x49, uint8_t x50 = addcarryx_u32(0x0, x5, x27);
+ uint32_t x52, uint8_t x53 = addcarryx_u32(x50, x7, x29);
+ uint32_t x55, uint8_t x56 = addcarryx_u32(x53, x9, x31);
+ uint32_t x58, uint8_t x59 = addcarryx_u32(x56, x11, x33);
+ uint32_t x61, uint8_t x62 = addcarryx_u32(x59, x13, x35);
+ uint32_t x64, uint8_t x65 = addcarryx_u32(x62, x15, x37);
+ uint32_t x67, uint8_t x68 = addcarryx_u32(x65, x17, x39);
+ uint32_t x70, uint8_t x71 = addcarryx_u32(x68, x19, x41);
+ uint32_t x73, uint8_t x74 = addcarryx_u32(x71, x21, x43);
+ uint32_t x76, uint8_t x77 = addcarryx_u32(x74, x23, x45);
+ uint32_t x79, uint8_t x80 = addcarryx_u32(x77, x25, x47);
+ uint32_t x82, uint8_t x83 = addcarryx_u32(x80, x24, x46);
+ uint32_t x85, uint8_t x86 = subborrow_u32(0x0, x49, 0xfffffe5b);
+ uint32_t x88, uint8_t x89 = subborrow_u32(x86, x52, 0xffffffff);
+ uint32_t x91, uint8_t x92 = subborrow_u32(x89, x55, 0xffffffff);
+ uint32_t x94, uint8_t x95 = subborrow_u32(x92, x58, 0xffffffff);
+ uint32_t x97, uint8_t x98 = subborrow_u32(x95, x61, 0xffffffff);
+ uint32_t x100, uint8_t x101 = subborrow_u32(x98, x64, 0xffffffff);
+ uint32_t x103, uint8_t x104 = subborrow_u32(x101, x67, 0xffffffff);
+ uint32_t x106, uint8_t x107 = subborrow_u32(x104, x70, 0xffffffff);
+ uint32_t x109, uint8_t x110 = subborrow_u32(x107, x73, 0xffffffff);
+ uint32_t x112, uint8_t x113 = subborrow_u32(x110, x76, 0xffffffff);
+ uint32_t x115, uint8_t x116 = subborrow_u32(x113, x79, 0xffffffff);
+ uint32_t x118, uint8_t x119 = subborrow_u32(x116, x82, 0x7fffffff);
+ uint32_t _, uint8_t x122 = subborrow_u32(x119, x83, 0x0);
+ uint32_t x123 = cmovznz32(x122, x118, x82);
+ uint32_t x124 = cmovznz32(x122, x115, x79);
+ uint32_t x125 = cmovznz32(x122, x112, x76);
+ uint32_t x126 = cmovznz32(x122, x109, x73);
+ uint32_t x127 = cmovznz32(x122, x106, x70);
+ uint32_t x128 = cmovznz32(x122, x103, x67);
+ uint32_t x129 = cmovznz32(x122, x100, x64);
+ uint32_t x130 = cmovznz32(x122, x97, x61);
+ uint32_t x131 = cmovznz32(x122, x94, x58);
+ uint32_t x132 = cmovznz32(x122, x91, x55);
+ uint32_t x133 = cmovznz32(x122, x88, x52);
+ uint32_t x134 = cmovznz32(x122, x85, x49);
+ return (x123, x124, x125, x126, x127, x128, x129, x130, x131, x132, x133, x134))
+(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 * 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 * uint32_t)
diff --git a/src/Specific/montgomery32_2e383m421_12limbs/fenz.c b/src/Specific/montgomery32_2e383m421_12limbs/fenz.c
new file mode 100644
index 000000000..61ca36c29
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m421_12limbs/fenz.c
@@ -0,0 +1,27 @@
+static void fenz(ReturnType uint32_t out[1], const uint32_t in1[12]) {
+  { const uint32_t x21 = in1[11];
+  { const uint32_t x22 = 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 x23 = (x22 | x21);
+  { uint32_t x24 = (x20 | x23);
+  { uint32_t x25 = (x18 | x24);
+  { uint32_t x26 = (x16 | x25);
+  { uint32_t x27 = (x14 | x26);
+  { uint32_t x28 = (x12 | x27);
+  { uint32_t x29 = (x10 | x28);
+  { uint32_t x30 = (x8 | x29);
+  { uint32_t x31 = (x6 | x30);
+  { uint32_t x32 = (x4 | x31);
+  { uint32_t x33 = (x2 | x32);
+  out[0] = x33;
+  }}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/montgomery32_2e383m421_12limbs/fenzDisplay.log b/src/Specific/montgomery32_2e383m421_12limbs/fenzDisplay.log
new file mode 100644
index 000000000..7a5f016e0
--- /dev/null
+++ b/src/Specific/montgomery32_2e383m421_12limbs/fenzDisplay.log
@@ -0,0 +1,18 @@
+λ x : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x21, x22, x20, x18, x16, x14, x12, x10, x8, x6, x4, x2)%core,
+ uint32_t x23 = (x22 | x21);
+ uint32_t x24 = (x20 | x23);
+ uint32_t x25 = (x18 | x24);
+ uint32_t x26 = (x16 | x25);
+ uint32_t x27 = (x14 | x26);
+ uint32_t x28 = (x12 | x27);
+ uint32_t x29 = (x10 | x28);
+ uint32_t x30 = (x8 | x29);
+ uint32_t x31 = (x6 | x30);
+ uint32_t x32 = (x4 | x31);
+ uint32_t x33 = (x2 | x32);
+ return x33)
+x
+     : word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 * word32 → ReturnType uint32_t