1 files changed, 56 insertions, 0 deletions
diff --git a/src/Specific/solinas32_2e140m27/fesquare.c b/src/Specific/solinas32_2e140m27/fesquare.c
new file mode 100644
index 000000000..07733e6c3
--- /dev/null
+++ b/src/Specific/solinas32_2e140m27/fesquare.c
@@ -0,0 +1,56 @@
+#include <stdint.h>
+#include <stdbool.h>
+#include <x86intrin.h>
+#include "liblow.h"
+
+#include "fesquare.h"
+
+typedef unsigned int uint128_t __attribute__((mode(TI)));
+
+#if (defined(__GNUC__) || defined(__GNUG__)) && !(defined(__clang__)||defined(__INTEL_COMPILER))
+// https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81294
+#define _subborrow_u32 __builtin_ia32_sbb_u32
+#define _subborrow_u64 __builtin_ia32_sbb_u64
+#endif
+
+#undef force_inline
+#define force_inline __attribute__((always_inline))
+
+void force_inline fesquare(uint64_t* out, uint64_t x9, uint64_t x10, uint64_t x8, uint64_t x6, uint64_t x4, uint64_t x2)
+{  uint64_t x11 = (((uint64_t)x2 * x9) + ((0x2 * ((uint64_t)x4 * x10)) + (((uint64_t)x6 * x8) + (((uint64_t)x8 * x6) + ((0x2 * ((uint64_t)x10 * x4)) + ((uint64_t)x9 * x2))))));
+{  uint64_t x12 = ((((uint64_t)x2 * x10) + (((uint64_t)x4 * x8) + (((uint64_t)x6 * x6) + (((uint64_t)x8 * x4) + ((uint64_t)x10 * x2))))) + (0x1b * ((uint64_t)x9 * x9)));
+{  uint64_t x13 = ((((uint64_t)x2 * x8) + ((0x2 * ((uint64_t)x4 * x6)) + ((0x2 * ((uint64_t)x6 * x4)) + ((uint64_t)x8 * x2)))) + (0x1b * ((0x2 * ((uint64_t)x10 * x9)) + (0x2 * ((uint64_t)x9 * x10)))));
+{  uint64_t x14 = ((((uint64_t)x2 * x6) + ((0x2 * ((uint64_t)x4 * x4)) + ((uint64_t)x6 * x2))) + (0x1b * (((uint64_t)x8 * x9) + ((0x2 * ((uint64_t)x10 * x10)) + ((uint64_t)x9 * x8)))));
+{  uint64_t x15 = ((((uint64_t)x2 * x4) + ((uint64_t)x4 * x2)) + (0x1b * (((uint64_t)x6 * x9) + (((uint64_t)x8 * x10) + (((uint64_t)x10 * x8) + ((uint64_t)x9 * x6))))));
+{  uint64_t x16 = (((uint64_t)x2 * x2) + (0x1b * ((0x2 * ((uint64_t)x4 * x9)) + ((0x2 * ((uint64_t)x6 * x10)) + (((uint64_t)x8 * x8) + ((0x2 * ((uint64_t)x10 * x6)) + (0x2 * ((uint64_t)x9 * x4))))))));
+{  uint64_t x17 = (x16 >> 0x18);
+{  uint32_t x18 = ((uint32_t)x16 & 0xffffff);
+{  uint64_t x19 = (x17 + x15);
+{  uint64_t x20 = (x19 >> 0x17);
+{  uint32_t x21 = ((uint32_t)x19 & 0x7fffff);
+{  uint64_t x22 = (x20 + x14);
+{  uint64_t x23 = (x22 >> 0x17);
+{  uint32_t x24 = ((uint32_t)x22 & 0x7fffff);
+{  uint64_t x25 = (x23 + x13);
+{  uint64_t x26 = (x25 >> 0x18);
+{  uint32_t x27 = ((uint32_t)x25 & 0xffffff);
+{  uint64_t x28 = (x26 + x12);
+{  uint32_t x29 = (uint32_t) (x28 >> 0x17);
+{  uint32_t x30 = ((uint32_t)x28 & 0x7fffff);
+{  uint64_t x31 = (x29 + x11);
+{  uint32_t x32 = (uint32_t) (x31 >> 0x17);
+{  uint32_t x33 = ((uint32_t)x31 & 0x7fffff);
+{  uint64_t x34 = (x18 + ((uint64_t)0x1b * x32));
+{  uint32_t x35 = (uint32_t) (x34 >> 0x18);
+{  uint32_t x36 = ((uint32_t)x34 & 0xffffff);
+{  uint32_t x37 = (x35 + x21);
+{  uint32_t x38 = (x37 >> 0x17);
+{  uint32_t x39 = (x37 & 0x7fffff);
+out[0] = x33;
+out[1] = x30;
+out[2] = x27;
+out[3] = x38 + x24;
+out[4] = x39;
+out[5] = x36;
+}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+// caller: uint64_t out[6];