1 files changed, 22 insertions, 0 deletions
diff --git a/src/Specific/montgomery64_2e256m2e224p2e192p2e96m1/fenzDisplay.log b/src/Specific/montgomery64_2e256m2e224p2e192p2e96m1/fenzDisplay.log
new file mode 100644
index 000000000..241c31016
--- /dev/null
+++ b/src/Specific/montgomery64_2e256m2e224p2e192p2e96m1/fenzDisplay.log
@@ -0,0 +1,22 @@
+λ x : word64 * word64 * word64 * word64,
+Interp-η
+(λ var : Syntax.base_type → Type,
+ λ '(x5, x6, x4, x2)%core,
+ uint64_t x7 = (x6 | x5);
+ uint64_t x8 = (x4 | x7);
+ uint64_t x9 = (x2 | x8);
+ return x9)
+x
+     : word64 * word64 * word64 * word64 → ReturnType (Tbase match (if match match (let (lower, _) := Synthesis.P.bound1 in
+                                                                                    lower) with
+                                                                             | 0%Z => Eq
+                                                                             | Z.pos _ => Lt
+                                                                             | Z.neg _ => Gt
+                                                                             end with
+                                                                       | Eq => true
+                                                                       | Lt => true
+                                                                       | Gt => false
+                                                                       end then Some 6 else None) with
+                                                             | Some lgsz => Syntax.TWord lgsz
+                                                             | None => Syntax.TZ
+                                                             end)