From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 28 Nov 2018 22:46:58 +0000 (+0000)
Subject: poster-tube-lid: sloping bottom of catch tip
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=77c39f4394b1ede3825b88234a0d9832cc6d3b78;p=reprap-play.git

poster-tube-lid: sloping bottom of catch tip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/poster-tube-lid.scad b/poster-tube-lid.scad
index 3ef360d..d4f2ccf 100644
--- a/poster-tube-lid.scad
+++ b/poster-tube-lid.scad
@@ -611,7 +611,8 @@ module CatchAssemblyCoreProfile(){
 	    ]);
 }
 
-module CatchTipProfile(){
+module CatchTipProfile(dy){
+  ddy = [0,dy];
   intersection(){
     translate(cppF){
       difference(){
@@ -620,8 +621,8 @@ module CatchTipProfile(){
       }
     }
     polygon([ cppa,
-	      cppi,
-	      cppd,
+	      cppi + ddy,
+	      cppd + ddy,
 	      cppc,
 	      cppb ]);
   }
@@ -641,8 +642,12 @@ module CatchCore(){ /////toplevel
   linear_extrude(height=catch_strap_thick, convexity=10)
     CatchAssemblyCoreProfile();
 
-  linear_extrude(height=catch_tip_th, convexity=10)
-    CatchTipProfile();
+  hull(){
+    linear_extrude(height=catch_head_th, convexity=10)
+      CatchTipProfile(0);
+    linear_extrude(height=catch_tip_th, convexity=10)
+      CatchTipProfile(catch_tip_th - catch_head_th);
+  }
 
   linear_extrude(height=catch_head_th, convexity=10)
     CatchHeadProfile();