From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 3 Jun 2017 18:52:17 +0000 (+0100)
Subject: sewing-table: Tile00: try to use round corner for RH polygon (may want to revert?)
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=c1294c0ded45cab6ef4bc88d609632a7ceafb505

sewing-table: Tile00: try to use round corner for RH polygon (may want to revert?)
---

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index dc4e056..f89859c 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -746,19 +746,25 @@ module Tile00(){ ////toplevel
   rcs = [R_EDGE(c,1)];
   difference(){
     union(){
-      Rectangle_TileBase(c);
-      Posts(posts);
-      RoundEdge(R_EDGE(c,0));
-      RoundEdge(R_EDGE(c,1));
-      InterlockEdge(tile_01_00_cnr, c[0]);
+      difference(){
+	union(){
+	  Rectangle_TileBase(c);
+	  Posts(posts);
+	  RoundEdge(R_EDGE(c,0));
+	  RoundEdge(c[1], c1bis);
+	  InterlockEdge(tile_01_00_cnr, c[0]);
+	}
+	RoundCornerCut(rcs);
+	translate([0,0,-20]) linear_extrude(height=40) {
+	  polygon([ c1bis, c1bis + [50,0], c2bis + [50,0], c2bis ]);
+	}
+      }
+      RoundEdge(c1bis, c2bis);
     }
-    RoundCornerCut(rcs);
     Machine();
-    translate([0,0,-20]) linear_extrude(height=40) {
-      polygon([ c1bis, c1bis + [50,0], c2bis + [50,0], c2bis ]);
-    }
   }
   RoundCornerAdd(rcs);
+  RoundCornerAdd([c1bis,c2bis,c[1]]);
 }
 
 module FitTest_FrontCurve(){ ////toplevel