From dfa019950beb9c66486607148b7a1e6090e52f69 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 4 Jun 2017 12:41:41 +0100
Subject: [PATCH] sewing-table: FitTest_PairLink: wip

---
 sewing-table.scad.m4 | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 3e75bc2..e126ecc 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -862,16 +862,33 @@ module FitTest_PairLink(cut=false){ ////toplevel
 	  }
 	}
       }
+      // strap holes
+      for (rot=[0,180]) rotate(rot) {
+	translate([ straphole_x_max - strap[0]/2, 0,0 ])
+	  cube(concat(strap,[20]), center=true);
+      }
     }
   }
 }
 
 module FitTest_PairDemo(){ ////toplevel
-  translate([-120,0,0]){
+  sh=[-100,-15,0];
+  translate(sh){
     FitTest_PairLink();
     %FitTest_FrontCurve();
     %FitTest_RearCurve();
   }
+  rotate([0,0,180]){
+    translate(sh){
+      difference(){
+	union(){
+	  FitTest_FrontCurve();
+	  FitTest_RearCurve();
+	}
+	#FitTest_PairLink(true);
+      }
+    }
+  }
 }
 
 module RoundCornerDemo_plat(cnr){
-- 
2.30.2