From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 21 May 2017 22:50:43 +0000 (+0100)
Subject: sewing-table: MachineArm cutout round end
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=1e21209cc1daa15556109bf29b17f6632ac49288;hp=a99c600d665705d387ac02bc3d7808b266ea6db3;p=reprap-play.git

sewing-table: MachineArm cutout round end
---

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index d0029d9..7e5fea9 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -32,6 +32,7 @@ demo_slop = 0.1;
 
 cutout_l_end_y_front_slop = 0.5;
 cutout_l_end_y_rear_slop = 0.5;
+cutout_l_end_x_slop = 0.25;
 
 cutout_l_end_y = 85;
 cutout_l_end_curve = 1;
@@ -318,14 +319,16 @@ module TestDemo(){ ////toplevel
 module Machine_Arm(){
   ysz = cutout_l_end_y_total;
   // assume the round end is arc of a circle
-  //rad = 
+  chordlen = dist2d([0,0], [ cutout_l_end_y, cutout_l_end_curve ]);
+  endrad = cutout_l_end_y / cutout_l_end_curve * chordlen;
   
   translate([0,0,-30]) linear_extrude(height=60) {
     translate(tile01_tr + [0, (-cutout_tile01_y + cutout_tile11_y)/2]) {
       intersection(){
 	translate([-100, -ysz/2])
 	  square([400, ysz]);
-	
+	translate([ endrad - cutout_l_end_y - cutout_l_end_x_slop, 0 ])
+	  circle(r=endrad, $fa=0.01,$fd=5);
       }
     }
   }