From 2acf7b572c9799d42a6ad8b5abbc2a3546ad2c87 Mon Sep 17 00:00:00 2001
From: Zeno Rogue <zeno@attnam.com>
Date: Thu, 28 Nov 2019 00:16:14 +0100
Subject: [PATCH] fixed Euclidean Torus Land of Storm

---
 landgen.cpp | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/landgen.cpp b/landgen.cpp
index dc53750a..e8c8629e 100644
--- a/landgen.cpp
+++ b/landgen.cpp
@@ -1282,13 +1282,16 @@ EX void giantLandSwitch(cell *c, int d, cell *from) {
       break;
     
     case laStorms: {
-      bool randstorm = PIU(hyperbolic_not37 || NONSTDVAR || (quotient && geometry != gZebraQuotient));
+      bool randstorm = PIU(hyperbolic_not37 || NONSTDVAR || (quotient && geometry != gZebraQuotient && !(euclid && !archimedean && !penrose && WDIM == 2)));
       if(fargen) {
       
-        if(euclid && bounded) {
-          /* todo */
+        if(euclid && smallbounded && WDIM == 2) {
+          auto s = sdxy();
+          gp::loc st {s.first/3, s.second/3};
+          if(c == at_euc2_coordinates(st)) c->wall = waCharged;
+          if(c == at_euc2_coordinates(s-st)) c->wall = waGrounded;
           }
-        else if(euclid) {
+        else if(euclid && WDIM == 2) {
           int x,y;
           tie(x,y) = euc2_coordinates(c);
           if((x+1)%3 == 0 && y%3 == 0) {