From 18827f0bf31f512ee96569f47184576b408f8c05 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 28 Jan 2016 00:23:06 +0000
Subject: [PATCH 1/1] lemon-stand.scad.pl: channelstopup (for revert)

---
 lemon-stand.scad.pl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lemon-stand.scad.pl b/lemon-stand.scad.pl
index ebba9ee..d63c0cd 100755
--- a/lemon-stand.scad.pl
+++ b/lemon-stand.scad.pl
@@ -21,6 +21,7 @@ print <<END;
 END
 
 print "torusyup = ", ($circle / sqrt(2)), ";\n";
+print "channelstopup = ", ($channel / sqrt(2)), ";\n";
 
 our @ellipse = map {
     my $theta = tau * $_ / $N;
@@ -148,7 +149,11 @@ module Stand(){
     difference(){
 	translate([0,0,torusyup])
 	    Torusy();
-	Channels();
+	intersection(){
+	    Channels();
+	    translate([-200,-200,-50])
+		cube([400,400, 50+channelstopup]);
+	}
 	translate([-200,-200,-50])
 	    cube([400,400,50]);
     }
-- 
2.30.2