From 447c8e469b9d6853cf55d8b57b8b3dd1533ce568 Mon Sep 17 00:00:00 2001
From: Zeno Rogue <zeno@attnam.com>
Date: Tue, 6 May 2025 14:42:40 +0200
Subject: [PATCH] fake:: should now work with untruncated gp(1,1), i.e., dual,
 on S3==3

---
 fake.cpp | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/fake.cpp b/fake.cpp
index a4f54c09..78c32628 100644
--- a/fake.cpp
+++ b/fake.cpp
@@ -37,6 +37,7 @@ EX namespace fake {
     if(WDIM == 2 && standard_tiling() && GOLDBERG && S3 == 3 && ((gp::param.first-gp::param.second) % 3)) return true;
     if(WDIM == 2 && standard_tiling() && GOLDBERG && S3 == 4 && gp::param.first == 1 && gp::param.second == 1) return true;
     if(WDIM == 2 && standard_tiling() && UNRECTIFIED && S3 == 4 && gp::param.first == 1 && gp::param.second == 1) return true;
+    if(WDIM == 2 && standard_tiling() && UNTRUNCATED && S3 == 3 && gp::param.first == 1 && gp::param.second == 1) return true;
     if(arcm::in() && PURE) return true;
     if(hat::in()) return true;
     if(WDIM == 2) return false;
@@ -137,6 +138,10 @@ EX namespace fake {
         c->cmove(d);
         return spin(90._deg * d) *  lxpush(cgi.crossf) * spin(-90._deg * c->c.spin(d) + M_PI);
         }
+      if(UNTRUNCATED && S3 == 3 && gp::param.first == 1 && gp::param.second == 1) {
+        c->cmove(d);
+        return spin(120._deg * (1-d)) *  lxpush(cgi.crossf) * spin(-120._deg * (1-c->c.spin(d)) + M_PI);
+        }
       if(embedded_plane) {
         geom3::light_flip(true);
         transmatrix T = adj(c, d);
@@ -187,6 +192,7 @@ EX namespace fake {
       bool impure = reg3::in() && !PURE;
       #else
       bool impure = !PURE;
+      if(UNTRUNCATED && gp::param.first == 1 && gp::param.second == 1) impure = false;
       #endif
       vector<int> mseq;
       if(impure) {
@@ -589,6 +595,8 @@ EX ld compute_euclidean() {
     return S7 / (0.375 * S7 - 0.5);
   if(WDIM == 2 && standard_tiling() && UNRECTIFIED && S3 == 4 && gp::param.first == 1 && gp::param.second == 1)
     return 4;
+  if(WDIM == 2 && standard_tiling() && UNTRUNCATED && S3 == 3 && gp::param.first == 1 && gp::param.second == 1)
+    return 6;
 
   if(WDIM == 2) return 4 / (S7-2.) + 2;
 
@@ -613,6 +621,8 @@ EX ld around_orig() {
   if(WDIM == 2 && standard_tiling() && GOLDBERG && S3 == 4 && gp::param.first == 1 && gp::param.second == 1) return 4;
   if(WDIM == 2 && standard_tiling() && UNRECTIFIED && S3 == 4 && gp::param.first == 1 && gp::param.second == 1)
     return S7;
+  if(WDIM == 2 && standard_tiling() && UNTRUNCATED && S3 == 3 && gp::param.first == 1 && gp::param.second == 1)
+    return S7;
   if(WDIM == 2)
     return S3;
   if(underlying == gRhombic3)