Update display logs and c files

10 files changed, 352 insertions, 0 deletions

diff --git a/src/Specific/solinas64_2e384m317_8limbs/feadd.c b/src/Specific/solinas64_2e384m317_8limbs/feadd.c
new file mode 100644
index 000000000..4def6ee9c
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/feadd.c
@@ -0,0 +1,27 @@
+static void feadd(uint64_t out[8], const uint64_t in1[8], const uint64_t in2[8]) {
+  { const uint64_t x16 = in1[7];
+  { const uint64_t x17 = 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 x30 = in2[7];
+  { const uint64_t x31 = in2[6];
+  { const uint64_t x29 = in2[5];
+  { const uint64_t x27 = in2[4];
+  { const uint64_t x25 = in2[3];
+  { const uint64_t x23 = in2[2];
+  { const uint64_t x21 = in2[1];
+  { const uint64_t x19 = in2[0];
+  out[0] = (x5 + x19);
+  out[1] = (x7 + x21);
+  out[2] = (x9 + x23);
+  out[3] = (x11 + x25);
+  out[4] = (x13 + x27);
+  out[5] = (x15 + x29);
+  out[6] = (x17 + x31);
+  out[7] = (x16 + x30);
+  }}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e384m317_8limbs/feaddDisplay.log b/src/Specific/solinas64_2e384m317_8limbs/feaddDisplay.log
new file mode 100644
index 000000000..023fc8a31
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/feaddDisplay.log
@@ -0,0 +1,7 @@
+λ x x0 : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x16, x17, x15, x13, x11, x9, x7, x5, (x30, x31, x29, x27, x25, x23, x21, x19))%core,
+ ((x16 + x30), (x17 + x31), (x15 + x29), (x13 + x27), (x11 + x25), (x9 + x23), (x7 + x21), (x5 + x19)))
+(x, x0)%core
+     : word64 * word64 * 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 * uint64_t)
diff --git a/src/Specific/solinas64_2e384m317_8limbs/femul.c b/src/Specific/solinas64_2e384m317_8limbs/femul.c
new file mode 100644
index 000000000..a28b9a126
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/femul.c
@@ -0,0 +1,64 @@
+static void femul(uint64_t out[8], const uint64_t in1[8], const uint64_t in2[8]) {
+  { const uint64_t x16 = in1[7];
+  { const uint64_t x17 = 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 x30 = in2[7];
+  { const uint64_t x31 = in2[6];
+  { const uint64_t x29 = in2[5];
+  { const uint64_t x27 = in2[4];
+  { const uint64_t x25 = in2[3];
+  { const uint64_t x23 = in2[2];
+  { const uint64_t x21 = in2[1];
+  { const uint64_t x19 = in2[0];
+  { uint128_t x32 = (((uint128_t)x5 * x30) + (((uint128_t)x7 * x31) + (((uint128_t)x9 * x29) + (((uint128_t)x11 * x27) + (((uint128_t)x13 * x25) + (((uint128_t)x15 * x23) + (((uint128_t)x17 * x21) + ((uint128_t)x16 * x19))))))));
+  { uint128_t x33 = ((((uint128_t)x5 * x31) + (((uint128_t)x7 * x29) + (((uint128_t)x9 * x27) + (((uint128_t)x11 * x25) + (((uint128_t)x13 * x23) + (((uint128_t)x15 * x21) + ((uint128_t)x17 * x19))))))) + (0x13d * ((uint128_t)x16 * x30)));
+  { uint128_t x34 = ((((uint128_t)x5 * x29) + (((uint128_t)x7 * x27) + (((uint128_t)x9 * x25) + (((uint128_t)x11 * x23) + (((uint128_t)x13 * x21) + ((uint128_t)x15 * x19)))))) + (0x13d * (((uint128_t)x17 * x30) + ((uint128_t)x16 * x31))));
+  { uint128_t x35 = ((((uint128_t)x5 * x27) + (((uint128_t)x7 * x25) + (((uint128_t)x9 * x23) + (((uint128_t)x11 * x21) + ((uint128_t)x13 * x19))))) + (0x13d * (((uint128_t)x15 * x30) + (((uint128_t)x17 * x31) + ((uint128_t)x16 * x29)))));
+  { uint128_t x36 = ((((uint128_t)x5 * x25) + (((uint128_t)x7 * x23) + (((uint128_t)x9 * x21) + ((uint128_t)x11 * x19)))) + (0x13d * (((uint128_t)x13 * x30) + (((uint128_t)x15 * x31) + (((uint128_t)x17 * x29) + ((uint128_t)x16 * x27))))));
+  { uint128_t x37 = ((((uint128_t)x5 * x23) + (((uint128_t)x7 * x21) + ((uint128_t)x9 * x19))) + (0x13d * (((uint128_t)x11 * x30) + (((uint128_t)x13 * x31) + (((uint128_t)x15 * x29) + (((uint128_t)x17 * x27) + ((uint128_t)x16 * x25)))))));
+  { uint128_t x38 = ((((uint128_t)x5 * x21) + ((uint128_t)x7 * x19)) + (0x13d * (((uint128_t)x9 * x30) + (((uint128_t)x11 * x31) + (((uint128_t)x13 * x29) + (((uint128_t)x15 * x27) + (((uint128_t)x17 * x25) + ((uint128_t)x16 * x23))))))));
+  { uint128_t x39 = (((uint128_t)x5 * x19) + (0x13d * (((uint128_t)x7 * x30) + (((uint128_t)x9 * x31) + (((uint128_t)x11 * x29) + (((uint128_t)x13 * x27) + (((uint128_t)x15 * x25) + (((uint128_t)x17 * x23) + ((uint128_t)x16 * x21)))))))));
+  { uint64_t x40 = (uint64_t) (x39 >> 0x30);
+  { uint64_t x41 = ((uint64_t)x39 & 0xffffffffffff);
+  { uint128_t x42 = (x40 + x38);
+  { uint64_t x43 = (uint64_t) (x42 >> 0x30);
+  { uint64_t x44 = ((uint64_t)x42 & 0xffffffffffff);
+  { uint128_t x45 = (x43 + x37);
+  { uint64_t x46 = (uint64_t) (x45 >> 0x30);
+  { uint64_t x47 = ((uint64_t)x45 & 0xffffffffffff);
+  { uint128_t x48 = (x46 + x36);
+  { uint64_t x49 = (uint64_t) (x48 >> 0x30);
+  { uint64_t x50 = ((uint64_t)x48 & 0xffffffffffff);
+  { uint128_t x51 = (x49 + x35);
+  { uint64_t x52 = (uint64_t) (x51 >> 0x30);
+  { uint64_t x53 = ((uint64_t)x51 & 0xffffffffffff);
+  { uint128_t x54 = (x52 + x34);
+  { uint64_t x55 = (uint64_t) (x54 >> 0x30);
+  { uint64_t x56 = ((uint64_t)x54 & 0xffffffffffff);
+  { uint128_t x57 = (x55 + x33);
+  { uint64_t x58 = (uint64_t) (x57 >> 0x30);
+  { uint64_t x59 = ((uint64_t)x57 & 0xffffffffffff);
+  { uint128_t x60 = (x58 + x32);
+  { uint64_t x61 = (uint64_t) (x60 >> 0x30);
+  { uint64_t x62 = ((uint64_t)x60 & 0xffffffffffff);
+  { uint64_t x63 = (x41 + (0x13d * x61));
+  { uint64_t x64 = (x63 >> 0x30);
+  { uint64_t x65 = (x63 & 0xffffffffffff);
+  { uint64_t x66 = (x64 + x44);
+  { uint64_t x67 = (x66 >> 0x30);
+  { uint64_t x68 = (x66 & 0xffffffffffff);
+  out[0] = x65;
+  out[1] = x68;
+  out[2] = (x67 + x47);
+  out[3] = x50;
+  out[4] = x53;
+  out[5] = x56;
+  out[6] = x59;
+  out[7] = x62;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e384m317_8limbs/femulDisplay.log b/src/Specific/solinas64_2e384m317_8limbs/femulDisplay.log
new file mode 100644
index 000000000..a9357bb1e
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/femulDisplay.log
@@ -0,0 +1,44 @@
+λ x x0 : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x16, x17, x15, x13, x11, x9, x7, x5, (x30, x31, x29, x27, x25, x23, x21, x19))%core,
+ uint128_t x32 = (((uint128_t)x5 * x30) + (((uint128_t)x7 * x31) + (((uint128_t)x9 * x29) + (((uint128_t)x11 * x27) + (((uint128_t)x13 * x25) + (((uint128_t)x15 * x23) + (((uint128_t)x17 * x21) + ((uint128_t)x16 * x19))))))));
+ uint128_t x33 = ((((uint128_t)x5 * x31) + (((uint128_t)x7 * x29) + (((uint128_t)x9 * x27) + (((uint128_t)x11 * x25) + (((uint128_t)x13 * x23) + (((uint128_t)x15 * x21) + ((uint128_t)x17 * x19))))))) + (0x13d * ((uint128_t)x16 * x30)));
+ uint128_t x34 = ((((uint128_t)x5 * x29) + (((uint128_t)x7 * x27) + (((uint128_t)x9 * x25) + (((uint128_t)x11 * x23) + (((uint128_t)x13 * x21) + ((uint128_t)x15 * x19)))))) + (0x13d * (((uint128_t)x17 * x30) + ((uint128_t)x16 * x31))));
+ uint128_t x35 = ((((uint128_t)x5 * x27) + (((uint128_t)x7 * x25) + (((uint128_t)x9 * x23) + (((uint128_t)x11 * x21) + ((uint128_t)x13 * x19))))) + (0x13d * (((uint128_t)x15 * x30) + (((uint128_t)x17 * x31) + ((uint128_t)x16 * x29)))));
+ uint128_t x36 = ((((uint128_t)x5 * x25) + (((uint128_t)x7 * x23) + (((uint128_t)x9 * x21) + ((uint128_t)x11 * x19)))) + (0x13d * (((uint128_t)x13 * x30) + (((uint128_t)x15 * x31) + (((uint128_t)x17 * x29) + ((uint128_t)x16 * x27))))));
+ uint128_t x37 = ((((uint128_t)x5 * x23) + (((uint128_t)x7 * x21) + ((uint128_t)x9 * x19))) + (0x13d * (((uint128_t)x11 * x30) + (((uint128_t)x13 * x31) + (((uint128_t)x15 * x29) + (((uint128_t)x17 * x27) + ((uint128_t)x16 * x25)))))));
+ uint128_t x38 = ((((uint128_t)x5 * x21) + ((uint128_t)x7 * x19)) + (0x13d * (((uint128_t)x9 * x30) + (((uint128_t)x11 * x31) + (((uint128_t)x13 * x29) + (((uint128_t)x15 * x27) + (((uint128_t)x17 * x25) + ((uint128_t)x16 * x23))))))));
+ uint128_t x39 = (((uint128_t)x5 * x19) + (0x13d * (((uint128_t)x7 * x30) + (((uint128_t)x9 * x31) + (((uint128_t)x11 * x29) + (((uint128_t)x13 * x27) + (((uint128_t)x15 * x25) + (((uint128_t)x17 * x23) + ((uint128_t)x16 * x21)))))))));
+ uint64_t x40 = (uint64_t) (x39 >> 0x30);
+ uint64_t x41 = ((uint64_t)x39 & 0xffffffffffff);
+ uint128_t x42 = (x40 + x38);
+ uint64_t x43 = (uint64_t) (x42 >> 0x30);
+ uint64_t x44 = ((uint64_t)x42 & 0xffffffffffff);
+ uint128_t x45 = (x43 + x37);
+ uint64_t x46 = (uint64_t) (x45 >> 0x30);
+ uint64_t x47 = ((uint64_t)x45 & 0xffffffffffff);
+ uint128_t x48 = (x46 + x36);
+ uint64_t x49 = (uint64_t) (x48 >> 0x30);
+ uint64_t x50 = ((uint64_t)x48 & 0xffffffffffff);
+ uint128_t x51 = (x49 + x35);
+ uint64_t x52 = (uint64_t) (x51 >> 0x30);
+ uint64_t x53 = ((uint64_t)x51 & 0xffffffffffff);
+ uint128_t x54 = (x52 + x34);
+ uint64_t x55 = (uint64_t) (x54 >> 0x30);
+ uint64_t x56 = ((uint64_t)x54 & 0xffffffffffff);
+ uint128_t x57 = (x55 + x33);
+ uint64_t x58 = (uint64_t) (x57 >> 0x30);
+ uint64_t x59 = ((uint64_t)x57 & 0xffffffffffff);
+ uint128_t x60 = (x58 + x32);
+ uint64_t x61 = (uint64_t) (x60 >> 0x30);
+ uint64_t x62 = ((uint64_t)x60 & 0xffffffffffff);
+ uint64_t x63 = (x41 + (0x13d * x61));
+ uint64_t x64 = (x63 >> 0x30);
+ uint64_t x65 = (x63 & 0xffffffffffff);
+ uint64_t x66 = (x64 + x44);
+ uint64_t x67 = (x66 >> 0x30);
+ uint64_t x68 = (x66 & 0xffffffffffff);
+ return (Return x62, Return x59, Return x56, Return x53, Return x50, (x67 + x47), Return x68, Return x65))
+(x, x0)%core
+     : word64 * word64 * 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 * uint64_t)
diff --git a/src/Specific/solinas64_2e384m317_8limbs/fesquare.c b/src/Specific/solinas64_2e384m317_8limbs/fesquare.c
new file mode 100644
index 000000000..87644b008
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/fesquare.c
@@ -0,0 +1,56 @@
+static void fesquare(uint64_t out[8], const uint64_t in1[8]) {
+  { const uint64_t x13 = in1[7];
+  { const uint64_t x14 = 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];
+  { uint128_t x15 = (((uint128_t)x2 * x13) + (((uint128_t)x4 * x14) + (((uint128_t)x6 * x12) + (((uint128_t)x8 * x10) + (((uint128_t)x10 * x8) + (((uint128_t)x12 * x6) + (((uint128_t)x14 * x4) + ((uint128_t)x13 * x2))))))));
+  { uint128_t x16 = ((((uint128_t)x2 * x14) + (((uint128_t)x4 * x12) + (((uint128_t)x6 * x10) + (((uint128_t)x8 * x8) + (((uint128_t)x10 * x6) + (((uint128_t)x12 * x4) + ((uint128_t)x14 * x2))))))) + (0x13d * ((uint128_t)x13 * x13)));
+  { uint128_t x17 = ((((uint128_t)x2 * x12) + (((uint128_t)x4 * x10) + (((uint128_t)x6 * x8) + (((uint128_t)x8 * x6) + (((uint128_t)x10 * x4) + ((uint128_t)x12 * x2)))))) + (0x13d * (((uint128_t)x14 * x13) + ((uint128_t)x13 * x14))));
+  { uint128_t x18 = ((((uint128_t)x2 * x10) + (((uint128_t)x4 * x8) + (((uint128_t)x6 * x6) + (((uint128_t)x8 * x4) + ((uint128_t)x10 * x2))))) + (0x13d * (((uint128_t)x12 * x13) + (((uint128_t)x14 * x14) + ((uint128_t)x13 * x12)))));
+  { uint128_t x19 = ((((uint128_t)x2 * x8) + (((uint128_t)x4 * x6) + (((uint128_t)x6 * x4) + ((uint128_t)x8 * x2)))) + (0x13d * (((uint128_t)x10 * x13) + (((uint128_t)x12 * x14) + (((uint128_t)x14 * x12) + ((uint128_t)x13 * x10))))));
+  { uint128_t x20 = ((((uint128_t)x2 * x6) + (((uint128_t)x4 * x4) + ((uint128_t)x6 * x2))) + (0x13d * (((uint128_t)x8 * x13) + (((uint128_t)x10 * x14) + (((uint128_t)x12 * x12) + (((uint128_t)x14 * x10) + ((uint128_t)x13 * x8)))))));
+  { uint128_t x21 = ((((uint128_t)x2 * x4) + ((uint128_t)x4 * x2)) + (0x13d * (((uint128_t)x6 * x13) + (((uint128_t)x8 * x14) + (((uint128_t)x10 * x12) + (((uint128_t)x12 * x10) + (((uint128_t)x14 * x8) + ((uint128_t)x13 * x6))))))));
+  { uint128_t x22 = (((uint128_t)x2 * x2) + (0x13d * (((uint128_t)x4 * x13) + (((uint128_t)x6 * x14) + (((uint128_t)x8 * x12) + (((uint128_t)x10 * x10) + (((uint128_t)x12 * x8) + (((uint128_t)x14 * x6) + ((uint128_t)x13 * x4)))))))));
+  { uint64_t x23 = (uint64_t) (x22 >> 0x30);
+  { uint64_t x24 = ((uint64_t)x22 & 0xffffffffffff);
+  { uint128_t x25 = (x23 + x21);
+  { uint64_t x26 = (uint64_t) (x25 >> 0x30);
+  { uint64_t x27 = ((uint64_t)x25 & 0xffffffffffff);
+  { uint128_t x28 = (x26 + x20);
+  { uint64_t x29 = (uint64_t) (x28 >> 0x30);
+  { uint64_t x30 = ((uint64_t)x28 & 0xffffffffffff);
+  { uint128_t x31 = (x29 + x19);
+  { uint64_t x32 = (uint64_t) (x31 >> 0x30);
+  { uint64_t x33 = ((uint64_t)x31 & 0xffffffffffff);
+  { uint128_t x34 = (x32 + x18);
+  { uint64_t x35 = (uint64_t) (x34 >> 0x30);
+  { uint64_t x36 = ((uint64_t)x34 & 0xffffffffffff);
+  { uint128_t x37 = (x35 + x17);
+  { uint64_t x38 = (uint64_t) (x37 >> 0x30);
+  { uint64_t x39 = ((uint64_t)x37 & 0xffffffffffff);
+  { uint128_t x40 = (x38 + x16);
+  { uint64_t x41 = (uint64_t) (x40 >> 0x30);
+  { uint64_t x42 = ((uint64_t)x40 & 0xffffffffffff);
+  { uint128_t x43 = (x41 + x15);
+  { uint64_t x44 = (uint64_t) (x43 >> 0x30);
+  { uint64_t x45 = ((uint64_t)x43 & 0xffffffffffff);
+  { uint64_t x46 = (x24 + (0x13d * x44));
+  { uint64_t x47 = (x46 >> 0x30);
+  { uint64_t x48 = (x46 & 0xffffffffffff);
+  { uint64_t x49 = (x47 + x27);
+  { uint64_t x50 = (x49 >> 0x30);
+  { uint64_t x51 = (x49 & 0xffffffffffff);
+  out[0] = x48;
+  out[1] = x51;
+  out[2] = (x50 + x30);
+  out[3] = x33;
+  out[4] = x36;
+  out[5] = x39;
+  out[6] = x42;
+  out[7] = x45;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e384m317_8limbs/fesquareDisplay.log b/src/Specific/solinas64_2e384m317_8limbs/fesquareDisplay.log
new file mode 100644
index 000000000..25c7fd4d2
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/fesquareDisplay.log
@@ -0,0 +1,44 @@
+λ x : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x13, x14, x12, x10, x8, x6, x4, x2)%core,
+ uint128_t x15 = (((uint128_t)x2 * x13) + (((uint128_t)x4 * x14) + (((uint128_t)x6 * x12) + (((uint128_t)x8 * x10) + (((uint128_t)x10 * x8) + (((uint128_t)x12 * x6) + (((uint128_t)x14 * x4) + ((uint128_t)x13 * x2))))))));
+ uint128_t x16 = ((((uint128_t)x2 * x14) + (((uint128_t)x4 * x12) + (((uint128_t)x6 * x10) + (((uint128_t)x8 * x8) + (((uint128_t)x10 * x6) + (((uint128_t)x12 * x4) + ((uint128_t)x14 * x2))))))) + (0x13d * ((uint128_t)x13 * x13)));
+ uint128_t x17 = ((((uint128_t)x2 * x12) + (((uint128_t)x4 * x10) + (((uint128_t)x6 * x8) + (((uint128_t)x8 * x6) + (((uint128_t)x10 * x4) + ((uint128_t)x12 * x2)))))) + (0x13d * (((uint128_t)x14 * x13) + ((uint128_t)x13 * x14))));
+ uint128_t x18 = ((((uint128_t)x2 * x10) + (((uint128_t)x4 * x8) + (((uint128_t)x6 * x6) + (((uint128_t)x8 * x4) + ((uint128_t)x10 * x2))))) + (0x13d * (((uint128_t)x12 * x13) + (((uint128_t)x14 * x14) + ((uint128_t)x13 * x12)))));
+ uint128_t x19 = ((((uint128_t)x2 * x8) + (((uint128_t)x4 * x6) + (((uint128_t)x6 * x4) + ((uint128_t)x8 * x2)))) + (0x13d * (((uint128_t)x10 * x13) + (((uint128_t)x12 * x14) + (((uint128_t)x14 * x12) + ((uint128_t)x13 * x10))))));
+ uint128_t x20 = ((((uint128_t)x2 * x6) + (((uint128_t)x4 * x4) + ((uint128_t)x6 * x2))) + (0x13d * (((uint128_t)x8 * x13) + (((uint128_t)x10 * x14) + (((uint128_t)x12 * x12) + (((uint128_t)x14 * x10) + ((uint128_t)x13 * x8)))))));
+ uint128_t x21 = ((((uint128_t)x2 * x4) + ((uint128_t)x4 * x2)) + (0x13d * (((uint128_t)x6 * x13) + (((uint128_t)x8 * x14) + (((uint128_t)x10 * x12) + (((uint128_t)x12 * x10) + (((uint128_t)x14 * x8) + ((uint128_t)x13 * x6))))))));
+ uint128_t x22 = (((uint128_t)x2 * x2) + (0x13d * (((uint128_t)x4 * x13) + (((uint128_t)x6 * x14) + (((uint128_t)x8 * x12) + (((uint128_t)x10 * x10) + (((uint128_t)x12 * x8) + (((uint128_t)x14 * x6) + ((uint128_t)x13 * x4)))))))));
+ uint64_t x23 = (uint64_t) (x22 >> 0x30);
+ uint64_t x24 = ((uint64_t)x22 & 0xffffffffffff);
+ uint128_t x25 = (x23 + x21);
+ uint64_t x26 = (uint64_t) (x25 >> 0x30);
+ uint64_t x27 = ((uint64_t)x25 & 0xffffffffffff);
+ uint128_t x28 = (x26 + x20);
+ uint64_t x29 = (uint64_t) (x28 >> 0x30);
+ uint64_t x30 = ((uint64_t)x28 & 0xffffffffffff);
+ uint128_t x31 = (x29 + x19);
+ uint64_t x32 = (uint64_t) (x31 >> 0x30);
+ uint64_t x33 = ((uint64_t)x31 & 0xffffffffffff);
+ uint128_t x34 = (x32 + x18);
+ uint64_t x35 = (uint64_t) (x34 >> 0x30);
+ uint64_t x36 = ((uint64_t)x34 & 0xffffffffffff);
+ uint128_t x37 = (x35 + x17);
+ uint64_t x38 = (uint64_t) (x37 >> 0x30);
+ uint64_t x39 = ((uint64_t)x37 & 0xffffffffffff);
+ uint128_t x40 = (x38 + x16);
+ uint64_t x41 = (uint64_t) (x40 >> 0x30);
+ uint64_t x42 = ((uint64_t)x40 & 0xffffffffffff);
+ uint128_t x43 = (x41 + x15);
+ uint64_t x44 = (uint64_t) (x43 >> 0x30);
+ uint64_t x45 = ((uint64_t)x43 & 0xffffffffffff);
+ uint64_t x46 = (x24 + (0x13d * x44));
+ uint64_t x47 = (x46 >> 0x30);
+ uint64_t x48 = (x46 & 0xffffffffffff);
+ uint64_t x49 = (x47 + x27);
+ uint64_t x50 = (x49 >> 0x30);
+ uint64_t x51 = (x49 & 0xffffffffffff);
+ return (Return x45, Return x42, Return x39, Return x36, Return x33, (x50 + x30), Return x51, Return x48))
+x
+     : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t)
diff --git a/src/Specific/solinas64_2e384m317_8limbs/fesub.c b/src/Specific/solinas64_2e384m317_8limbs/fesub.c
new file mode 100644
index 000000000..f924ee599
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/fesub.c
@@ -0,0 +1,27 @@
+static void fesub(uint64_t out[8], const uint64_t in1[8], const uint64_t in2[8]) {
+  { const uint64_t x16 = in1[7];
+  { const uint64_t x17 = 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 x30 = in2[7];
+  { const uint64_t x31 = in2[6];
+  { const uint64_t x29 = in2[5];
+  { const uint64_t x27 = in2[4];
+  { const uint64_t x25 = in2[3];
+  { const uint64_t x23 = in2[2];
+  { const uint64_t x21 = in2[1];
+  { const uint64_t x19 = in2[0];
+  out[0] = ((0x1fffffffffd86 + x5) - x19);
+  out[1] = ((0x1fffffffffffe + x7) - x21);
+  out[2] = ((0x1fffffffffffe + x9) - x23);
+  out[3] = ((0x1fffffffffffe + x11) - x25);
+  out[4] = ((0x1fffffffffffe + x13) - x27);
+  out[5] = ((0x1fffffffffffe + x15) - x29);
+  out[6] = ((0x1fffffffffffe + x17) - x31);
+  out[7] = ((0x1fffffffffffe + x16) - x30);
+  }}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e384m317_8limbs/fesubDisplay.log b/src/Specific/solinas64_2e384m317_8limbs/fesubDisplay.log
new file mode 100644
index 000000000..61c5edf9e
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/fesubDisplay.log
@@ -0,0 +1,7 @@
+λ x x0 : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x16, x17, x15, x13, x11, x9, x7, x5, (x30, x31, x29, x27, x25, x23, x21, x19))%core,
+ (((0x1fffffffffffe + x16) - x30), ((0x1fffffffffffe + x17) - x31), ((0x1fffffffffffe + x15) - x29), ((0x1fffffffffffe + x13) - x27), ((0x1fffffffffffe + x11) - x25), ((0x1fffffffffffe + x9) - x23), ((0x1fffffffffffe + x7) - x21), ((0x1fffffffffd86 + x5) - x19)))
+(x, x0)%core
+     : word64 * word64 * 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 * uint64_t)
diff --git a/src/Specific/solinas64_2e384m317_8limbs/freeze.c b/src/Specific/solinas64_2e384m317_8limbs/freeze.c
new file mode 100644
index 000000000..c037a517a
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/freeze.c
@@ -0,0 +1,44 @@
+static void freeze(uint64_t out[8], const uint64_t in1[8]) {
+  { const uint64_t x13 = in1[7];
+  { const uint64_t x14 = 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 x16, uint8_t x17 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (0x0, Return x2, 0xfffffffffec3);
+  { uint64_t x19, uint8_t x20 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x17, Return x4, 0xffffffffffff);
+  { uint64_t x22, uint8_t x23 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x20, Return x6, 0xffffffffffff);
+  { uint64_t x25, uint8_t x26 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x23, Return x8, 0xffffffffffff);
+  { uint64_t x28, uint8_t x29 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x26, Return x10, 0xffffffffffff);
+  { uint64_t x31, uint8_t x32 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x29, Return x12, 0xffffffffffff);
+  { uint64_t x34, uint8_t x35 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x32, Return x14, 0xffffffffffff);
+  { uint64_t x37, uint8_t x38 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x35, Return x13, 0xffffffffffff);
+  { uint64_t x39 = cmovznz64(x38, 0x0, 0xffffffffffffffffL);
+  { uint64_t x40 = (x39 & 0xfffffffffec3);
+  { uint64_t x42, uint8_t x43 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (0x0, Return x16, Return x40);
+  { uint64_t x44 = (x39 & 0xffffffffffff);
+  { uint64_t x46, uint8_t x47 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x43, Return x19, Return x44);
+  { uint64_t x48 = (x39 & 0xffffffffffff);
+  { uint64_t x50, uint8_t x51 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x47, Return x22, Return x48);
+  { uint64_t x52 = (x39 & 0xffffffffffff);
+  { uint64_t x54, uint8_t x55 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x51, Return x25, Return x52);
+  { uint64_t x56 = (x39 & 0xffffffffffff);
+  { uint64_t x58, uint8_t x59 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x55, Return x28, Return x56);
+  { uint64_t x60 = (x39 & 0xffffffffffff);
+  { uint64_t x62, uint8_t x63 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x59, Return x31, Return x60);
+  { uint64_t x64 = (x39 & 0xffffffffffff);
+  { uint64_t x66, uint8_t x67 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x63, Return x34, Return x64);
+  { uint64_t x68 = (x39 & 0xffffffffffff);
+  { uint64_t x70, uint8_t _ = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x67, Return x37, Return x68);
+  out[0] = x42;
+  out[1] = x46;
+  out[2] = x50;
+  out[3] = x54;
+  out[4] = x58;
+  out[5] = x62;
+  out[6] = x66;
+  out[7] = x70;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e384m317_8limbs/freezeDisplay.log b/src/Specific/solinas64_2e384m317_8limbs/freezeDisplay.log
new file mode 100644
index 000000000..c7cb86cad
--- /dev/null
+++ b/src/Specific/solinas64_2e384m317_8limbs/freezeDisplay.log
@@ -0,0 +1,32 @@
+λ x : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x13, x14, x12, x10, x8, x6, x4, x2)%core,
+ uint64_t x16, uint8_t x17 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (0x0, Return x2, 0xfffffffffec3);
+ uint64_t x19, uint8_t x20 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x17, Return x4, 0xffffffffffff);
+ uint64_t x22, uint8_t x23 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x20, Return x6, 0xffffffffffff);
+ uint64_t x25, uint8_t x26 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x23, Return x8, 0xffffffffffff);
+ uint64_t x28, uint8_t x29 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x26, Return x10, 0xffffffffffff);
+ uint64_t x31, uint8_t x32 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x29, Return x12, 0xffffffffffff);
+ uint64_t x34, uint8_t x35 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x32, Return x14, 0xffffffffffff);
+ uint64_t x37, uint8_t x38 = Op (Syntax.SubWithGetBorrow 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x35, Return x13, 0xffffffffffff);
+ uint64_t x39 = cmovznz64(x38, 0x0, 0xffffffffffffffffL);
+ uint64_t x40 = (x39 & 0xfffffffffec3);
+ uint64_t x42, uint8_t x43 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (0x0, Return x16, Return x40);
+ uint64_t x44 = (x39 & 0xffffffffffff);
+ uint64_t x46, uint8_t x47 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x43, Return x19, Return x44);
+ uint64_t x48 = (x39 & 0xffffffffffff);
+ uint64_t x50, uint8_t x51 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x47, Return x22, Return x48);
+ uint64_t x52 = (x39 & 0xffffffffffff);
+ uint64_t x54, uint8_t x55 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x51, Return x25, Return x52);
+ uint64_t x56 = (x39 & 0xffffffffffff);
+ uint64_t x58, uint8_t x59 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x55, Return x28, Return x56);
+ uint64_t x60 = (x39 & 0xffffffffffff);
+ uint64_t x62, uint8_t x63 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x59, Return x31, Return x60);
+ uint64_t x64 = (x39 & 0xffffffffffff);
+ uint64_t x66, uint8_t x67 = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x63, Return x34, Return x64);
+ uint64_t x68 = (x39 & 0xffffffffffff);
+ uint64_t x70, uint8_t _ = Op (Syntax.AddWithGetCarry 48 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x67, Return x37, Return x68);
+ (Return x70, Return x66, Return x62, Return x58, Return x54, Return x50, Return x46, Return x42))
+x
+     : word64 * word64 * word64 * word64 * word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t)