From 8ae0a3b9612ff68edd54017628e30c88c91d5306 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 3 Jun 2017 19:28:52 +0100
Subject: [PATCH] sewing-table: Front: frontcurve_dualcurve wip

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

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index f44e1e3..e7ff1e9 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -100,6 +100,9 @@ frontcurve_side_skew = 3.5 / 72;
 frontcurve_avoid_y = 70;
 frontcurve_z_slop = 0.75;
 
+frontcurve_strt_len = 60;
+frontcurve_dualcurve_angle = 90 - 65;
+
 // calculated
 
 TEST = false;
@@ -726,6 +729,13 @@ module Tile00(){ ////toplevel
   sz = [250,170];
   c0 = tile01_tr + [0,-sz[1]];
   c = Rectangle_corners(c0, sz);
+
+  // the edge c[1]..c[2] needs a diagonal chunk, from c1bis to c2bis
+  c2bis = [ -cutout_l_end_x + rearedge_len + frontcurve_strt_len, c[2][1] ];
+  c1bis = [ c[1][0],
+	    c[2][1] -
+	    (c[2][0] - c2bis[0]) * tan(90 - frontcurve_dualcurve_angle) ];
+
   cnr_posts = Rectangle_corners2posts(c);
   cty = cutout_tile01_y;
   rcy = cty + frontcurve_avoid_y;
@@ -746,6 +756,9 @@ module Tile00(){ ////toplevel
     }
     RoundCornerCut(rcs);
     Machine();
+    translate([0,0,-20]) linear_extrude(height=40) {
+      polygon([ c1bis, c1bis + [50,0], c2bis + [50,0], c2bis ]);
+    }
   }
   RoundCornerAdd(rcs);
 }
-- 
2.30.2