From 2665b64e4462923d8109766ac4b3fc459bef7d52 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 4 Jun 2017 01:16:54 +0100
Subject: [PATCH] sewing-table: new front profile wip

---
 Makefile                       |  2 +-
 sewing-table-front-profile.fig |  2 +-
 sewing-table.scad.m4           | 16 ++++++++++++++++
 3 files changed, 18 insertions(+), 2 deletions(-)

diff --git a/Makefile b/Makefile
index 1ccbb32..4c6c5bd 100644
--- a/Makefile
+++ b/Makefile
@@ -167,7 +167,7 @@ question-question.eps: question-question.fig
 
 sewing-table%.stl: sewing-table-rear-profile.dxf
 
-sewing-table-rear-profile.eps: sewing-table-rear-profile.fig
+sewing-table-%-profile.eps: sewing-table-%-profile.fig
 		fig2dev -L eps -D +40 <$< >$@.tmp
 	        @mv -f $@.tmp $@
 
diff --git a/sewing-table-front-profile.fig b/sewing-table-front-profile.fig
index 16b6f59..d318174 100644
--- a/sewing-table-front-profile.fig
+++ b/sewing-table-front-profile.fig
@@ -15,7 +15,7 @@ Single
 2 1 0 1 1 7 50 -1 -1 0.000 0 0 -1 0 0 2
 	 3455 7525 12541 7946
 3 1 0 1 28 7 40 -1 -1 0.000 0 0 0 25
-	 5678 3664 4889 3652 4306 3643 3840 3631 3270 3619 2819 3607
+	 5678 3664 4889 3652 4306 3643 3820 3620 3256 3600 2800 3591
 	 2416 3574 3055 1515 11023 1659 11041 2606 10905 2752 10663 2946
 	 10504 3060 10304 3176 10113 3305 9859 3397 9581 3493 9306 3565
 	 8734 3613 8367 3618 7996 3636 7520 3639 7119 3651 6713 3663
diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 64f144b..724d24b 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -489,6 +489,21 @@ module Machine_NewRearProfile(){
   }
 }
 
+module Machine_NewFrontProfile(){
+  // figures copied out of xfig edit boxes
+  // best not to edit the posbox size if poss - just move it
+  posbox = 10 * ([11.8022,8.0600] - [4.2044,19.1867]); // box, Green
+  refline = 10 * ([7.6778,16.7222] - [27.8689,17.6578]); // line, Blue
+  refline_mm = (11-1)*10;
+  sh = -[abs(posbox[0]), abs(posbox[1])];
+  rot = atan2(-refline[0], refline[1]);
+  sc = refline_mm / vectorlen2d(refline);
+  //echo("SH",sh,rot,sc);
+  mirror([1,0]) scale(sc) rotate(rot+90) translate(sh){
+    import("sewing-table-front-profile.dxf", convexity=10); // spline, Pink3
+  }
+}
+
 module Machine_NewRearCurve(){
   slant = atan2(4,210-10);
   //echo("SL",slant);
@@ -850,6 +865,7 @@ module Demo(){ ////toplevel
 //Machine_Profile();
 //Machine_NewRearProfile();
 //Machine_NewRearCurve();
+//Machine_NewFrontProfile();
 //Machine_Curves();
 //Machine();
 //FitTest();
-- 
2.30.2