From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 6 Jun 2017 18:53:58 +0000 (+0100)
Subject: sewing-table: NewArm: wip
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=4bdc60437edbc850ee12a848a70fc0075c6286e0;ds=sidebyside

sewing-table: NewArm: wip
---

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index bed22ea..660f84a 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -39,6 +39,7 @@ cutout_l_end_x_slop = 0.25;
 cutout_l_end_x = 22;
 cutout_l_end_y = machine_rear_to_front;
 cutout_l_end_curve = 1;
+cutout_l_end_new_x_slop = -1.4;
 cutout_l_end_y_total = cutout_l_end_y
   + cutout_l_end_y_front_slop + cutout_l_end_y_rear_slop;
 
@@ -514,6 +515,18 @@ module Machine_NewEndProfileDemo(){ ////toplevel
   }
 }
 
+module Machine_NewArm(){
+  translate(tile01_tr + [ -cutout_l_end_x + cutout_l_end_new_x_slop,
+			  (-cutout_tile01_y + cutout_tile11_y)/2 ]){
+    rotate(-90){
+      hull(){
+	for (d=[0,200]) 
+	  translate([0,d]) Machine_NewEndProfile();
+      }
+    }
+  }
+}
+
 module Machine_NewRearCurve(){
   slant = atan2(4,210-10);
   //echo("SL",slant);