Update display logs and c files

10 files changed, 317 insertions, 0 deletions

diff --git a/src/Specific/solinas64_2e379m19_7limbs/feadd.c b/src/Specific/solinas64_2e379m19_7limbs/feadd.c
new file mode 100644
index 000000000..9acf97578
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/feadd.c
@@ -0,0 +1,24 @@
+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];
+  out[0] = (x5 + x17);
+  out[1] = (x7 + x19);
+  out[2] = (x9 + x21);
+  out[3] = (x11 + x23);
+  out[4] = (x13 + x25);
+  out[5] = (x15 + x27);
+  out[6] = (x14 + x26);
+  }}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e379m19_7limbs/feaddDisplay.log b/src/Specific/solinas64_2e379m19_7limbs/feaddDisplay.log
new file mode 100644
index 000000000..6320440fc
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/feaddDisplay.log
@@ -0,0 +1,7 @@
+λ 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,
+ ((x14 + x26), (x15 + x27), (x13 + x25), (x11 + x23), (x9 + x21), (x7 + x19), (x5 + x17)))
+(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/solinas64_2e379m19_7limbs/femul.c b/src/Specific/solinas64_2e379m19_7limbs/femul.c
new file mode 100644
index 000000000..13915c820
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/femul.c
@@ -0,0 +1,57 @@
+static void femul(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];
+  { uint128_t x28 = (((uint128_t)x5 * x26) + ((0x2 * ((uint128_t)x7 * x27)) + ((0x2 * ((uint128_t)x9 * x25)) + ((0x2 * ((uint128_t)x11 * x23)) + ((0x2 * ((uint128_t)x13 * x21)) + ((0x2 * ((uint128_t)x15 * x19)) + ((uint128_t)x14 * x17)))))));
+  { uint128_t x29 = ((((uint128_t)x5 * x27) + ((0x2 * ((uint128_t)x7 * x25)) + ((0x2 * ((uint128_t)x9 * x23)) + ((0x2 * ((uint128_t)x11 * x21)) + ((0x2 * ((uint128_t)x13 * x19)) + ((uint128_t)x15 * x17)))))) + (0x13 * ((uint128_t)x14 * x26)));
+  { uint128_t x30 = ((((uint128_t)x5 * x25) + ((0x2 * ((uint128_t)x7 * x23)) + ((0x2 * ((uint128_t)x9 * x21)) + ((0x2 * ((uint128_t)x11 * x19)) + ((uint128_t)x13 * x17))))) + (0x13 * (((uint128_t)x15 * x26) + ((uint128_t)x14 * x27))));
+  { uint128_t x31 = ((((uint128_t)x5 * x23) + ((0x2 * ((uint128_t)x7 * x21)) + ((0x2 * ((uint128_t)x9 * x19)) + ((uint128_t)x11 * x17)))) + (0x13 * (((uint128_t)x13 * x26) + (((uint128_t)x15 * x27) + ((uint128_t)x14 * x25)))));
+  { uint128_t x32 = ((((uint128_t)x5 * x21) + ((0x2 * ((uint128_t)x7 * x19)) + ((uint128_t)x9 * x17))) + (0x13 * (((uint128_t)x11 * x26) + (((uint128_t)x13 * x27) + (((uint128_t)x15 * x25) + ((uint128_t)x14 * x23))))));
+  { uint128_t x33 = ((((uint128_t)x5 * x19) + ((uint128_t)x7 * x17)) + (0x13 * (((uint128_t)x9 * x26) + (((uint128_t)x11 * x27) + (((uint128_t)x13 * x25) + (((uint128_t)x15 * x23) + ((uint128_t)x14 * x21)))))));
+  { uint128_t x34 = (((uint128_t)x5 * x17) + (0x13 * ((0x2 * ((uint128_t)x7 * x26)) + ((0x2 * ((uint128_t)x9 * x27)) + ((0x2 * ((uint128_t)x11 * x25)) + ((0x2 * ((uint128_t)x13 * x23)) + ((0x2 * ((uint128_t)x15 * x21)) + (0x2 * ((uint128_t)x14 * x19)))))))));
+  { uint128_t x35 = (x34 >> 0x37);
+  { uint64_t x36 = ((uint64_t)x34 & 0x7fffffffffffff);
+  { uint128_t x37 = (x35 + x33);
+  { uint128_t x38 = (x37 >> 0x36);
+  { uint64_t x39 = ((uint64_t)x37 & 0x3fffffffffffff);
+  { uint128_t x40 = (x38 + x32);
+  { uint64_t x41 = (uint64_t) (x40 >> 0x36);
+  { uint64_t x42 = ((uint64_t)x40 & 0x3fffffffffffff);
+  { uint128_t x43 = (x41 + x31);
+  { uint64_t x44 = (uint64_t) (x43 >> 0x36);
+  { uint64_t x45 = ((uint64_t)x43 & 0x3fffffffffffff);
+  { uint128_t x46 = (x44 + x30);
+  { uint64_t x47 = (uint64_t) (x46 >> 0x36);
+  { uint64_t x48 = ((uint64_t)x46 & 0x3fffffffffffff);
+  { uint128_t x49 = (x47 + x29);
+  { uint64_t x50 = (uint64_t) (x49 >> 0x36);
+  { uint64_t x51 = ((uint64_t)x49 & 0x3fffffffffffff);
+  { uint128_t x52 = (x50 + x28);
+  { uint64_t x53 = (uint64_t) (x52 >> 0x36);
+  { uint64_t x54 = ((uint64_t)x52 & 0x3fffffffffffff);
+  { uint128_t x55 = (x36 + ((uint128_t)0x13 * x53));
+  { uint64_t x56 = (uint64_t) (x55 >> 0x37);
+  { uint64_t x57 = ((uint64_t)x55 & 0x7fffffffffffff);
+  { uint64_t x58 = (x56 + x39);
+  { uint64_t x59 = (x58 >> 0x36);
+  { uint64_t x60 = (x58 & 0x3fffffffffffff);
+  out[0] = x57;
+  out[1] = x60;
+  out[2] = (x59 + x42);
+  out[3] = x45;
+  out[4] = x48;
+  out[5] = x51;
+  out[6] = x54;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e379m19_7limbs/femulDisplay.log b/src/Specific/solinas64_2e379m19_7limbs/femulDisplay.log
new file mode 100644
index 000000000..dabe48b5c
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/femulDisplay.log
@@ -0,0 +1,40 @@
+λ 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,
+ uint128_t x28 = (((uint128_t)x5 * x26) + ((0x2 * ((uint128_t)x7 * x27)) + ((0x2 * ((uint128_t)x9 * x25)) + ((0x2 * ((uint128_t)x11 * x23)) + ((0x2 * ((uint128_t)x13 * x21)) + ((0x2 * ((uint128_t)x15 * x19)) + ((uint128_t)x14 * x17)))))));
+ uint128_t x29 = ((((uint128_t)x5 * x27) + ((0x2 * ((uint128_t)x7 * x25)) + ((0x2 * ((uint128_t)x9 * x23)) + ((0x2 * ((uint128_t)x11 * x21)) + ((0x2 * ((uint128_t)x13 * x19)) + ((uint128_t)x15 * x17)))))) + (0x13 * ((uint128_t)x14 * x26)));
+ uint128_t x30 = ((((uint128_t)x5 * x25) + ((0x2 * ((uint128_t)x7 * x23)) + ((0x2 * ((uint128_t)x9 * x21)) + ((0x2 * ((uint128_t)x11 * x19)) + ((uint128_t)x13 * x17))))) + (0x13 * (((uint128_t)x15 * x26) + ((uint128_t)x14 * x27))));
+ uint128_t x31 = ((((uint128_t)x5 * x23) + ((0x2 * ((uint128_t)x7 * x21)) + ((0x2 * ((uint128_t)x9 * x19)) + ((uint128_t)x11 * x17)))) + (0x13 * (((uint128_t)x13 * x26) + (((uint128_t)x15 * x27) + ((uint128_t)x14 * x25)))));
+ uint128_t x32 = ((((uint128_t)x5 * x21) + ((0x2 * ((uint128_t)x7 * x19)) + ((uint128_t)x9 * x17))) + (0x13 * (((uint128_t)x11 * x26) + (((uint128_t)x13 * x27) + (((uint128_t)x15 * x25) + ((uint128_t)x14 * x23))))));
+ uint128_t x33 = ((((uint128_t)x5 * x19) + ((uint128_t)x7 * x17)) + (0x13 * (((uint128_t)x9 * x26) + (((uint128_t)x11 * x27) + (((uint128_t)x13 * x25) + (((uint128_t)x15 * x23) + ((uint128_t)x14 * x21)))))));
+ uint128_t x34 = (((uint128_t)x5 * x17) + (0x13 * ((0x2 * ((uint128_t)x7 * x26)) + ((0x2 * ((uint128_t)x9 * x27)) + ((0x2 * ((uint128_t)x11 * x25)) + ((0x2 * ((uint128_t)x13 * x23)) + ((0x2 * ((uint128_t)x15 * x21)) + (0x2 * ((uint128_t)x14 * x19)))))))));
+ uint128_t x35 = (x34 >> 0x37);
+ uint64_t x36 = ((uint64_t)x34 & 0x7fffffffffffff);
+ uint128_t x37 = (x35 + x33);
+ uint128_t x38 = (x37 >> 0x36);
+ uint64_t x39 = ((uint64_t)x37 & 0x3fffffffffffff);
+ uint128_t x40 = (x38 + x32);
+ uint64_t x41 = (uint64_t) (x40 >> 0x36);
+ uint64_t x42 = ((uint64_t)x40 & 0x3fffffffffffff);
+ uint128_t x43 = (x41 + x31);
+ uint64_t x44 = (uint64_t) (x43 >> 0x36);
+ uint64_t x45 = ((uint64_t)x43 & 0x3fffffffffffff);
+ uint128_t x46 = (x44 + x30);
+ uint64_t x47 = (uint64_t) (x46 >> 0x36);
+ uint64_t x48 = ((uint64_t)x46 & 0x3fffffffffffff);
+ uint128_t x49 = (x47 + x29);
+ uint64_t x50 = (uint64_t) (x49 >> 0x36);
+ uint64_t x51 = ((uint64_t)x49 & 0x3fffffffffffff);
+ uint128_t x52 = (x50 + x28);
+ uint64_t x53 = (uint64_t) (x52 >> 0x36);
+ uint64_t x54 = ((uint64_t)x52 & 0x3fffffffffffff);
+ uint128_t x55 = (x36 + ((uint128_t)0x13 * x53));
+ uint64_t x56 = (uint64_t) (x55 >> 0x37);
+ uint64_t x57 = ((uint64_t)x55 & 0x7fffffffffffff);
+ uint64_t x58 = (x56 + x39);
+ uint64_t x59 = (x58 >> 0x36);
+ uint64_t x60 = (x58 & 0x3fffffffffffff);
+ return (Return x54, Return x51, Return x48, Return x45, (x59 + x42), Return x60, Return x57))
+(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/solinas64_2e379m19_7limbs/fesquare.c b/src/Specific/solinas64_2e379m19_7limbs/fesquare.c
new file mode 100644
index 000000000..e2ddf49ac
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/fesquare.c
@@ -0,0 +1,50 @@
+static void fesquare(uint64_t out[7], 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];
+  { uint128_t x13 = (((uint128_t)x2 * x11) + ((0x2 * ((uint128_t)x4 * x12)) + ((0x2 * ((uint128_t)x6 * x10)) + ((0x2 * ((uint128_t)x8 * x8)) + ((0x2 * ((uint128_t)x10 * x6)) + ((0x2 * ((uint128_t)x12 * x4)) + ((uint128_t)x11 * x2)))))));
+  { uint128_t x14 = ((((uint128_t)x2 * x12) + ((0x2 * ((uint128_t)x4 * x10)) + ((0x2 * ((uint128_t)x6 * x8)) + ((0x2 * ((uint128_t)x8 * x6)) + ((0x2 * ((uint128_t)x10 * x4)) + ((uint128_t)x12 * x2)))))) + (0x13 * ((uint128_t)x11 * x11)));
+  { uint128_t x15 = ((((uint128_t)x2 * x10) + ((0x2 * ((uint128_t)x4 * x8)) + ((0x2 * ((uint128_t)x6 * x6)) + ((0x2 * ((uint128_t)x8 * x4)) + ((uint128_t)x10 * x2))))) + (0x13 * (((uint128_t)x12 * x11) + ((uint128_t)x11 * x12))));
+  { uint128_t x16 = ((((uint128_t)x2 * x8) + ((0x2 * ((uint128_t)x4 * x6)) + ((0x2 * ((uint128_t)x6 * x4)) + ((uint128_t)x8 * x2)))) + (0x13 * (((uint128_t)x10 * x11) + (((uint128_t)x12 * x12) + ((uint128_t)x11 * x10)))));
+  { uint128_t x17 = ((((uint128_t)x2 * x6) + ((0x2 * ((uint128_t)x4 * x4)) + ((uint128_t)x6 * x2))) + (0x13 * (((uint128_t)x8 * x11) + (((uint128_t)x10 * x12) + (((uint128_t)x12 * x10) + ((uint128_t)x11 * x8))))));
+  { uint128_t x18 = ((((uint128_t)x2 * x4) + ((uint128_t)x4 * x2)) + (0x13 * (((uint128_t)x6 * x11) + (((uint128_t)x8 * x12) + (((uint128_t)x10 * x10) + (((uint128_t)x12 * x8) + ((uint128_t)x11 * x6)))))));
+  { uint128_t x19 = (((uint128_t)x2 * x2) + (0x13 * ((0x2 * ((uint128_t)x4 * x11)) + ((0x2 * ((uint128_t)x6 * x12)) + ((0x2 * ((uint128_t)x8 * x10)) + ((0x2 * ((uint128_t)x10 * x8)) + ((0x2 * ((uint128_t)x12 * x6)) + (0x2 * ((uint128_t)x11 * x4)))))))));
+  { uint128_t x20 = (x19 >> 0x37);
+  { uint64_t x21 = ((uint64_t)x19 & 0x7fffffffffffff);
+  { uint128_t x22 = (x20 + x18);
+  { uint128_t x23 = (x22 >> 0x36);
+  { uint64_t x24 = ((uint64_t)x22 & 0x3fffffffffffff);
+  { uint128_t x25 = (x23 + x17);
+  { uint64_t x26 = (uint64_t) (x25 >> 0x36);
+  { uint64_t x27 = ((uint64_t)x25 & 0x3fffffffffffff);
+  { uint128_t x28 = (x26 + x16);
+  { uint64_t x29 = (uint64_t) (x28 >> 0x36);
+  { uint64_t x30 = ((uint64_t)x28 & 0x3fffffffffffff);
+  { uint128_t x31 = (x29 + x15);
+  { uint64_t x32 = (uint64_t) (x31 >> 0x36);
+  { uint64_t x33 = ((uint64_t)x31 & 0x3fffffffffffff);
+  { uint128_t x34 = (x32 + x14);
+  { uint64_t x35 = (uint64_t) (x34 >> 0x36);
+  { uint64_t x36 = ((uint64_t)x34 & 0x3fffffffffffff);
+  { uint128_t x37 = (x35 + x13);
+  { uint64_t x38 = (uint64_t) (x37 >> 0x36);
+  { uint64_t x39 = ((uint64_t)x37 & 0x3fffffffffffff);
+  { uint128_t x40 = (x21 + ((uint128_t)0x13 * x38));
+  { uint64_t x41 = (uint64_t) (x40 >> 0x37);
+  { uint64_t x42 = ((uint64_t)x40 & 0x7fffffffffffff);
+  { uint64_t x43 = (x41 + x24);
+  { uint64_t x44 = (x43 >> 0x36);
+  { uint64_t x45 = (x43 & 0x3fffffffffffff);
+  out[0] = x42;
+  out[1] = x45;
+  out[2] = (x44 + x27);
+  out[3] = x30;
+  out[4] = x33;
+  out[5] = x36;
+  out[6] = x39;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e379m19_7limbs/fesquareDisplay.log b/src/Specific/solinas64_2e379m19_7limbs/fesquareDisplay.log
new file mode 100644
index 000000000..90ba6043f
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/fesquareDisplay.log
@@ -0,0 +1,40 @@
+λ x : word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x11, x12, x10, x8, x6, x4, x2)%core,
+ uint128_t x13 = (((uint128_t)x2 * x11) + ((0x2 * ((uint128_t)x4 * x12)) + ((0x2 * ((uint128_t)x6 * x10)) + ((0x2 * ((uint128_t)x8 * x8)) + ((0x2 * ((uint128_t)x10 * x6)) + ((0x2 * ((uint128_t)x12 * x4)) + ((uint128_t)x11 * x2)))))));
+ uint128_t x14 = ((((uint128_t)x2 * x12) + ((0x2 * ((uint128_t)x4 * x10)) + ((0x2 * ((uint128_t)x6 * x8)) + ((0x2 * ((uint128_t)x8 * x6)) + ((0x2 * ((uint128_t)x10 * x4)) + ((uint128_t)x12 * x2)))))) + (0x13 * ((uint128_t)x11 * x11)));
+ uint128_t x15 = ((((uint128_t)x2 * x10) + ((0x2 * ((uint128_t)x4 * x8)) + ((0x2 * ((uint128_t)x6 * x6)) + ((0x2 * ((uint128_t)x8 * x4)) + ((uint128_t)x10 * x2))))) + (0x13 * (((uint128_t)x12 * x11) + ((uint128_t)x11 * x12))));
+ uint128_t x16 = ((((uint128_t)x2 * x8) + ((0x2 * ((uint128_t)x4 * x6)) + ((0x2 * ((uint128_t)x6 * x4)) + ((uint128_t)x8 * x2)))) + (0x13 * (((uint128_t)x10 * x11) + (((uint128_t)x12 * x12) + ((uint128_t)x11 * x10)))));
+ uint128_t x17 = ((((uint128_t)x2 * x6) + ((0x2 * ((uint128_t)x4 * x4)) + ((uint128_t)x6 * x2))) + (0x13 * (((uint128_t)x8 * x11) + (((uint128_t)x10 * x12) + (((uint128_t)x12 * x10) + ((uint128_t)x11 * x8))))));
+ uint128_t x18 = ((((uint128_t)x2 * x4) + ((uint128_t)x4 * x2)) + (0x13 * (((uint128_t)x6 * x11) + (((uint128_t)x8 * x12) + (((uint128_t)x10 * x10) + (((uint128_t)x12 * x8) + ((uint128_t)x11 * x6)))))));
+ uint128_t x19 = (((uint128_t)x2 * x2) + (0x13 * ((0x2 * ((uint128_t)x4 * x11)) + ((0x2 * ((uint128_t)x6 * x12)) + ((0x2 * ((uint128_t)x8 * x10)) + ((0x2 * ((uint128_t)x10 * x8)) + ((0x2 * ((uint128_t)x12 * x6)) + (0x2 * ((uint128_t)x11 * x4)))))))));
+ uint128_t x20 = (x19 >> 0x37);
+ uint64_t x21 = ((uint64_t)x19 & 0x7fffffffffffff);
+ uint128_t x22 = (x20 + x18);
+ uint128_t x23 = (x22 >> 0x36);
+ uint64_t x24 = ((uint64_t)x22 & 0x3fffffffffffff);
+ uint128_t x25 = (x23 + x17);
+ uint64_t x26 = (uint64_t) (x25 >> 0x36);
+ uint64_t x27 = ((uint64_t)x25 & 0x3fffffffffffff);
+ uint128_t x28 = (x26 + x16);
+ uint64_t x29 = (uint64_t) (x28 >> 0x36);
+ uint64_t x30 = ((uint64_t)x28 & 0x3fffffffffffff);
+ uint128_t x31 = (x29 + x15);
+ uint64_t x32 = (uint64_t) (x31 >> 0x36);
+ uint64_t x33 = ((uint64_t)x31 & 0x3fffffffffffff);
+ uint128_t x34 = (x32 + x14);
+ uint64_t x35 = (uint64_t) (x34 >> 0x36);
+ uint64_t x36 = ((uint64_t)x34 & 0x3fffffffffffff);
+ uint128_t x37 = (x35 + x13);
+ uint64_t x38 = (uint64_t) (x37 >> 0x36);
+ uint64_t x39 = ((uint64_t)x37 & 0x3fffffffffffff);
+ uint128_t x40 = (x21 + ((uint128_t)0x13 * x38));
+ uint64_t x41 = (uint64_t) (x40 >> 0x37);
+ uint64_t x42 = ((uint64_t)x40 & 0x7fffffffffffff);
+ uint64_t x43 = (x41 + x24);
+ uint64_t x44 = (x43 >> 0x36);
+ uint64_t x45 = (x43 & 0x3fffffffffffff);
+ return (Return x39, Return x36, Return x33, Return x30, (x44 + x27), Return x45, Return x42))
+x
+     : 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/solinas64_2e379m19_7limbs/fesub.c b/src/Specific/solinas64_2e379m19_7limbs/fesub.c
new file mode 100644
index 000000000..e888ad3f0
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/fesub.c
@@ -0,0 +1,24 @@
+static void fesub(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];
+  out[0] = ((0xffffffffffffda + x5) - x17);
+  out[1] = ((0x7ffffffffffffe + x7) - x19);
+  out[2] = ((0x7ffffffffffffe + x9) - x21);
+  out[3] = ((0x7ffffffffffffe + x11) - x23);
+  out[4] = ((0x7ffffffffffffe + x13) - x25);
+  out[5] = ((0x7ffffffffffffe + x15) - x27);
+  out[6] = ((0x7ffffffffffffe + x14) - x26);
+  }}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e379m19_7limbs/fesubDisplay.log b/src/Specific/solinas64_2e379m19_7limbs/fesubDisplay.log
new file mode 100644
index 000000000..30992c3d8
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/fesubDisplay.log
@@ -0,0 +1,7 @@
+λ 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,
+ (((0x7ffffffffffffe + x14) - x26), ((0x7ffffffffffffe + x15) - x27), ((0x7ffffffffffffe + x13) - x25), ((0x7ffffffffffffe + x11) - x23), ((0x7ffffffffffffe + x9) - x21), ((0x7ffffffffffffe + x7) - x19), ((0xffffffffffffda + x5) - x17)))
+(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/solinas64_2e379m19_7limbs/freeze.c b/src/Specific/solinas64_2e379m19_7limbs/freeze.c
new file mode 100644
index 000000000..f1a2abbfb
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/freeze.c
@@ -0,0 +1,39 @@
+static void freeze(uint64_t out[7], 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 x14, uint8_t x15 = Op (Syntax.SubWithGetBorrow 55 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (0x0, Return x2, 0x7fffffffffffed);
+  { uint64_t x17, uint8_t x18 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x15, Return x4, 0x3fffffffffffff);
+  { uint64_t x20, uint8_t x21 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x18, Return x6, 0x3fffffffffffff);
+  { uint64_t x23, uint8_t x24 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x21, Return x8, 0x3fffffffffffff);
+  { uint64_t x26, uint8_t x27 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x24, Return x10, 0x3fffffffffffff);
+  { uint64_t x29, uint8_t x30 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x27, Return x12, 0x3fffffffffffff);
+  { uint64_t x32, uint8_t x33 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x30, Return x11, 0x3fffffffffffff);
+  { uint64_t x34 = cmovznz64(x33, 0x0, 0xffffffffffffffffL);
+  { uint64_t x35 = (x34 & 0x7fffffffffffed);
+  { uint64_t x37, uint8_t x38 = Op (Syntax.AddWithGetCarry 55 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (0x0, Return x14, Return x35);
+  { uint64_t x39 = (x34 & 0x3fffffffffffff);
+  { uint64_t x41, uint8_t x42 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x38, Return x17, Return x39);
+  { uint64_t x43 = (x34 & 0x3fffffffffffff);
+  { uint64_t x45, uint8_t x46 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x42, Return x20, Return x43);
+  { uint64_t x47 = (x34 & 0x3fffffffffffff);
+  { uint64_t x49, uint8_t x50 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x46, Return x23, Return x47);
+  { uint64_t x51 = (x34 & 0x3fffffffffffff);
+  { uint64_t x53, uint8_t x54 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x50, Return x26, Return x51);
+  { uint64_t x55 = (x34 & 0x3fffffffffffff);
+  { uint64_t x57, uint8_t x58 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x54, Return x29, Return x55);
+  { uint64_t x59 = (x34 & 0x3fffffffffffff);
+  { uint64_t x61, uint8_t _ = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x58, Return x32, Return x59);
+  out[0] = x37;
+  out[1] = x41;
+  out[2] = x45;
+  out[3] = x49;
+  out[4] = x53;
+  out[5] = x57;
+  out[6] = x61;
+  }}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+}
diff --git a/src/Specific/solinas64_2e379m19_7limbs/freezeDisplay.log b/src/Specific/solinas64_2e379m19_7limbs/freezeDisplay.log
new file mode 100644
index 000000000..bd8d59c3b
--- /dev/null
+++ b/src/Specific/solinas64_2e379m19_7limbs/freezeDisplay.log
@@ -0,0 +1,29 @@
+λ x : word64 * word64 * word64 * word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x11, x12, x10, x8, x6, x4, x2)%core,
+ uint64_t x14, uint8_t x15 = Op (Syntax.SubWithGetBorrow 55 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (0x0, Return x2, 0x7fffffffffffed);
+ uint64_t x17, uint8_t x18 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x15, Return x4, 0x3fffffffffffff);
+ uint64_t x20, uint8_t x21 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x18, Return x6, 0x3fffffffffffff);
+ uint64_t x23, uint8_t x24 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x21, Return x8, 0x3fffffffffffff);
+ uint64_t x26, uint8_t x27 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x24, Return x10, 0x3fffffffffffff);
+ uint64_t x29, uint8_t x30 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x27, Return x12, 0x3fffffffffffff);
+ uint64_t x32, uint8_t x33 = Op (Syntax.SubWithGetBorrow 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x30, Return x11, 0x3fffffffffffff);
+ uint64_t x34 = cmovznz64(x33, 0x0, 0xffffffffffffffffL);
+ uint64_t x35 = (x34 & 0x7fffffffffffed);
+ uint64_t x37, uint8_t x38 = Op (Syntax.AddWithGetCarry 55 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (0x0, Return x14, Return x35);
+ uint64_t x39 = (x34 & 0x3fffffffffffff);
+ uint64_t x41, uint8_t x42 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x38, Return x17, Return x39);
+ uint64_t x43 = (x34 & 0x3fffffffffffff);
+ uint64_t x45, uint8_t x46 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x42, Return x20, Return x43);
+ uint64_t x47 = (x34 & 0x3fffffffffffff);
+ uint64_t x49, uint8_t x50 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x46, Return x23, Return x47);
+ uint64_t x51 = (x34 & 0x3fffffffffffff);
+ uint64_t x53, uint8_t x54 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x50, Return x26, Return x51);
+ uint64_t x55 = (x34 & 0x3fffffffffffff);
+ uint64_t x57, uint8_t x58 = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x54, Return x29, Return x55);
+ uint64_t x59 = (x34 & 0x3fffffffffffff);
+ uint64_t x61, uint8_t _ = Op (Syntax.AddWithGetCarry 54 (Syntax.TWord 3) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 6) (Syntax.TWord 3)) (Return x58, Return x32, Return x59);
+ (Return x61, Return x57, Return x53, Return x49, Return x45, Return x41, Return x37))
+x
+     : word64 * word64 * word64 * word64 * word64 * word64 * word64 → ReturnType (uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t * uint64_t)