From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 28 Jan 2016 00:23:06 +0000 (+0000)
Subject: lemon-stand.scad.pl: channelstopup (for revert)
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=18827f0bf31f512ee96569f47184576b408f8c05;p=reprap-play.git

lemon-stand.scad.pl: channelstopup (for revert)
---

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]);
     }