Update display logs and c files

12 files changed, 315 insertions, 0 deletions

diff --git a/src/Specific/montgomery32_2e221m3_7limbs/feadd.c b/src/Specific/montgomery32_2e221m3_7limbs/feadd.c
new file mode 100644
index 000000000..abe3c2d31
--- /dev/null
+++ b/src/Specific/montgomery32_2e221m3_7limbs/feadd.c
@@ -0,0 +1,46 @@
+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, 0xfffffffd, &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, 0x1fffffff, &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_2e221m3_7limbs/feaddDisplay.log b/src/Specific/montgomery32_2e221m3_7limbs/feaddDisplay.log
new file mode 100644
index 000000000..9586e9d0b
--- /dev/null
+++ b/src/Specific/montgomery32_2e221m3_7limbs/feaddDisplay.log
@@ -0,0 +1,29 @@
+λ 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, 0xfffffffd);
+ 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, 0x1fffffff);
+ 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_2e221m3_7limbs/fenz.c b/src/Specific/montgomery32_2e221m3_7limbs/fenz.c
new file mode 100644
index 000000000..387dcfe67
--- /dev/null
+++ b/src/Specific/montgomery32_2e221m3_7limbs/fenz.c
@@ -0,0 +1,17 @@
+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_2e221m3_7limbs/fenzDisplay.log b/src/Specific/montgomery32_2e221m3_7limbs/fenzDisplay.log
new file mode 100644
index 000000000..9685f89d7
--- /dev/null
+++ b/src/Specific/montgomery32_2e221m3_7limbs/fenzDisplay.log
@@ -0,0 +1,13 @@
+λ 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_2e222m117_7limbs/feadd.c b/src/Specific/montgomery32_2e222m117_7limbs/feadd.c
new file mode 100644
index 000000000..b687807e2
--- /dev/null
+++ b/src/Specific/montgomery32_2e222m117_7limbs/feadd.c
@@ -0,0 +1,46 @@
+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, 0xffffff8b, &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, 0x3fffffff, &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_2e222m117_7limbs/feaddDisplay.log b/src/Specific/montgomery32_2e222m117_7limbs/feaddDisplay.log
new file mode 100644
index 000000000..42c686f39
--- /dev/null
+++ b/src/Specific/montgomery32_2e222m117_7limbs/feaddDisplay.log
@@ -0,0 +1,29 @@
+λ 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, 0xffffff8b);
+ 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, 0x3fffffff);
+ 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_2e222m117_7limbs/fenz.c b/src/Specific/montgomery32_2e222m117_7limbs/fenz.c
new file mode 100644
index 000000000..387dcfe67
--- /dev/null
+++ b/src/Specific/montgomery32_2e222m117_7limbs/fenz.c
@@ -0,0 +1,17 @@
+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_2e222m117_7limbs/fenzDisplay.log b/src/Specific/montgomery32_2e222m117_7limbs/fenzDisplay.log
new file mode 100644
index 000000000..9685f89d7
--- /dev/null
+++ b/src/Specific/montgomery32_2e222m117_7limbs/fenzDisplay.log
@@ -0,0 +1,13 @@
+λ 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/montgomery64_2e389m21_7limbs/feadd.c b/src/Specific/montgomery64_2e389m21_7limbs/feadd.c
new file mode 100644
index 000000000..6e359760a
--- /dev/null
+++ b/src/Specific/montgomery64_2e389m21_7limbs/feadd.c
@@ -0,0 +1,46 @@
+static void feadd(uint64_t out[7], const uint64_t in1[7], const uint64_t in2[7]) {
+  { const uint64_t x14 = in1[6];
+  { const uint64_t x15 = in1[5];
+  { const uint64_t x13 = in1[4];
+  { const uint64_t x11 = in1[3];
+  { const uint64_t x9 = in1[2];
+  { const uint64_t x7 = in1[1];
+  { const uint64_t x5 = in1[0];
+  { const uint64_t x26 = in2[6];
+  { const uint64_t x27 = in2[5];
+  { const uint64_t x25 = in2[4];
+  { const uint64_t x23 = in2[3];
+  { const uint64_t x21 = in2[2];
+  { const uint64_t x19 = in2[1];
+  { const uint64_t x17 = in2[0];
+  { uint64_t x29; uint8_t x30 = _addcarryx_u64(0x0, x5, x17, &x29);
+  { uint64_t x32; uint8_t x33 = _addcarryx_u64(x30, x7, x19, &x32);
+  { uint64_t x35; uint8_t x36 = _addcarryx_u64(x33, x9, x21, &x35);
+  { uint64_t x38; uint8_t x39 = _addcarryx_u64(x36, x11, x23, &x38);
+  { uint64_t x41; uint8_t x42 = _addcarryx_u64(x39, x13, x25, &x41);
+  { uint64_t x44; uint8_t x45 = _addcarryx_u64(x42, x15, x27, &x44);
+  { uint64_t x47; uint8_t x48 = _addcarryx_u64(x45, x14, x26, &x47);
+  { uint64_t x50; uint8_t x51 = _subborrow_u64(0x0, x29, 0xffffffffffffffebL, &x50);
+  { uint64_t x53; uint8_t x54 = _subborrow_u64(x51, x32, 0xffffffffffffffffL, &x53);
+  { uint64_t x56; uint8_t x57 = _subborrow_u64(x54, x35, 0xffffffffffffffffL, &x56);
+  { uint64_t x59; uint8_t x60 = _subborrow_u64(x57, x38, 0xffffffffffffffffL, &x59);
+  { uint64_t x62; uint8_t x63 = _subborrow_u64(x60, x41, 0xffffffffffffffffL, &x62);
+  { uint64_t x65; uint8_t x66 = _subborrow_u64(x63, x44, 0xffffffffffffffffL, &x65);
+  { uint64_t x68; uint8_t x69 = _subborrow_u64(x66, x47, 0x1f, &x68);
+  { uint64_t _; uint8_t x72 = _subborrow_u64(x69, x48, 0x0, &_);
+  { uint64_t x73 = cmovznz64(x72, x68, x47);
+  { uint64_t x74 = cmovznz64(x72, x65, x44);
+  { uint64_t x75 = cmovznz64(x72, x62, x41);
+  { uint64_t x76 = cmovznz64(x72, x59, x38);
+  { uint64_t x77 = cmovznz64(x72, x56, x35);
+  { uint64_t x78 = cmovznz64(x72, x53, x32);
+  { uint64_t x79 = cmovznz64(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/montgomery64_2e389m21_7limbs/feaddDisplay.log b/src/Specific/montgomery64_2e389m21_7limbs/feaddDisplay.log
new file mode 100644
index 000000000..cb7dd7090
--- /dev/null
+++ b/src/Specific/montgomery64_2e389m21_7limbs/feaddDisplay.log
@@ -0,0 +1,29 @@
+λ x x0 : word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x14, x15, x13, x11, x9, x7, x5, (x26, x27, x25, x23, x21, x19, x17))%core,
+ uint64_t x29, uint8_t x30 = addcarryx_u64(0x0, x5, x17);
+ uint64_t x32, uint8_t x33 = addcarryx_u64(x30, x7, x19);
+ uint64_t x35, uint8_t x36 = addcarryx_u64(x33, x9, x21);
+ uint64_t x38, uint8_t x39 = addcarryx_u64(x36, x11, x23);
+ uint64_t x41, uint8_t x42 = addcarryx_u64(x39, x13, x25);
+ uint64_t x44, uint8_t x45 = addcarryx_u64(x42, x15, x27);
+ uint64_t x47, uint8_t x48 = addcarryx_u64(x45, x14, x26);
+ uint64_t x50, uint8_t x51 = subborrow_u64(0x0, x29, 0xffffffffffffffebL);
+ uint64_t x53, uint8_t x54 = subborrow_u64(x51, x32, 0xffffffffffffffffL);
+ uint64_t x56, uint8_t x57 = subborrow_u64(x54, x35, 0xffffffffffffffffL);
+ uint64_t x59, uint8_t x60 = subborrow_u64(x57, x38, 0xffffffffffffffffL);
+ uint64_t x62, uint8_t x63 = subborrow_u64(x60, x41, 0xffffffffffffffffL);
+ uint64_t x65, uint8_t x66 = subborrow_u64(x63, x44, 0xffffffffffffffffL);
+ uint64_t x68, uint8_t x69 = subborrow_u64(x66, x47, 0x1f);
+ uint64_t _, uint8_t x72 = subborrow_u64(x69, x48, 0x0);
+ uint64_t x73 = cmovznz64(x72, x68, x47);
+ uint64_t x74 = cmovznz64(x72, x65, x44);
+ uint64_t x75 = cmovznz64(x72, x62, x41);
+ uint64_t x76 = cmovznz64(x72, x59, x38);
+ uint64_t x77 = cmovznz64(x72, x56, x35);
+ uint64_t x78 = cmovznz64(x72, x53, x32);
+ uint64_t x79 = cmovznz64(x72, x50, x29);
+ return (x73, x74, x75, x76, x77, x78, x79))
+(x, x0)%core
+     : word64 * word64 * word64 * word64 * word64 * word64 * word64 → word64 * word64 * word64 * word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t)
diff --git a/src/Specific/montgomery64_2e389m21_7limbs/fenz.c b/src/Specific/montgomery64_2e389m21_7limbs/fenz.c
new file mode 100644
index 000000000..d09ab7ff5
--- /dev/null
+++ b/src/Specific/montgomery64_2e389m21_7limbs/fenz.c
@@ -0,0 +1,17 @@
+static void fenz(ReturnType uint64_t out[1], const uint64_t in1[7]) {
+  { const uint64_t x11 = in1[6];
+  { const uint64_t x12 = in1[5];
+  { const uint64_t x10 = in1[4];
+  { const uint64_t x8 = in1[3];
+  { const uint64_t x6 = in1[2];
+  { const uint64_t x4 = in1[1];
+  { const uint64_t x2 = in1[0];
+  { uint64_t x13 = (x12 | x11);
+  { uint64_t x14 = (x10 | x13);
+  { uint64_t x15 = (x8 | x14);
+  { uint64_t x16 = (x6 | x15);
+  { uint64_t x17 = (x4 | x16);
+  { uint64_t x18 = (x2 | x17);
+  out[0] = x18;
+  }}}}}}}}}}}}}
+}
diff --git a/src/Specific/montgomery64_2e389m21_7limbs/fenzDisplay.log b/src/Specific/montgomery64_2e389m21_7limbs/fenzDisplay.log
new file mode 100644
index 000000000..28baa6eea
--- /dev/null
+++ b/src/Specific/montgomery64_2e389m21_7limbs/fenzDisplay.log
@@ -0,0 +1,13 @@
+λ x : word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x11, x12, x10, x8, x6, x4, x2)%core,
+ uint64_t x13 = (x12 | x11);
+ uint64_t x14 = (x10 | x13);
+ uint64_t x15 = (x8 | x14);
+ uint64_t x16 = (x6 | x15);
+ uint64_t x17 = (x4 | x16);
+ uint64_t x18 = (x2 | x17);
+ return x18)
+x
+     : word64 * word64 * word64 * word64 * word64 * word64 * word64 → ReturnType uint64_t