From 91795a70384d96ad97b4b85b8d6413bc1cbeebb3 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 2 Jan 2017 16:23:14 +0000
Subject: [PATCH 1/1] sewing-table: Use RoundCornerAdd/Cut in Tile12 too

---
 sewing-table.scad.m4 | 13 ++-----------
 1 file changed, 2 insertions(+), 11 deletions(-)

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 4ef697e..2231e3f 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -121,16 +121,6 @@ module RoundEdge(left_cnr, right_cnr) {
   }
 }
 
-module RoundLeftCorner(this_cnr, right_cnr) {
-  INREFFRAME(this_cnr, right_cnr) INREFFRAME_EDGE {
-    difference(){
-      sphere(r= round_edge_rad, $fn=60);
-      translate([0,0, -20])
-	cube([20,20,20]);
-    }
-  }
-}
-
 module RoundCornerCut(this_cnr, right_cnr) {
   offr= round_cnr_rad - round_edge_rad;
   INREFFRAME(this_cnr, right_cnr) INREFFRAME_EDGE {
@@ -316,11 +306,12 @@ module Tile12(){ ////toplevel
       TileBase(c[0], c[2]);
       RoundEdge(c[2], c[3]);
       RoundEdge(c[3], c[0]);
-      RoundLeftCorner(c[2], c[3]);
       Posts(posts);
     }
     InterlockEdge(c[0], c[1], 1);
+    RoundCornerCut(c[2], c[3]);
   }
+  RoundCornerAdd(c[2], c[3]);
 }
 
 module Demo(){ ////toplevel
-- 
2.30.2