From 566a4121fab428bd75c551f1574643e8e1394bdf Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 27 Aug 2016 16:51:42 +0100
Subject: [PATCH] flyscreen-handle: wip cutout

---
 flyscreen-handle.scad | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/flyscreen-handle.scad b/flyscreen-handle.scad
index 5a535fc..bdae865 100644
--- a/flyscreen-handle.scad
+++ b/flyscreen-handle.scad
@@ -107,18 +107,18 @@ module PsHull(ps) {
 
 module LeverSect(top, inadj=false){
   P3 = inadj ? P3a : P3t;
+  P6 = inadj ? P6a : P6t;
   P8 = top ? P8t : P8b;
   P9 = top ? P9t : P9b;
-  diag = inadj ? atan(outside_push_inadj_slope) : 0;
   PsHull([P2,P3,P4]);
   difference(){
     PsHull([P0,P1,P2,P5,P8,P9]);
-    translate(Q0) {
-      rotate(diag){
-	hull(){
-	  circle(r=edge_or, $fn=20);
-	  translate([0,10]) circle(r=edge_or, $fn=20);
-	}
+    hull(){
+      for (p = [ Q0,
+		 Q0 + (P6-P5),
+		 Q0 + (P3-P4)
+		 ]) {
+	translate(p) circle(r=edge_or, $fn=20);
       }
     }
   }
-- 
2.30.2