poster-tube-lid: Separate out CatchTipProfile

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

diff --git a/poster-tube-lid.scad b/poster-tube-lid.scad
index fdaf3bfdd675a69574d499518787dc18abca9d88..ad563a96976e4774954ff4a33e6192740a863a57 100644 (file)
--- a/poster-tube-lid.scad
+++ b/poster-tube-lid.scad
@@ -79,6 +79,7 @@ sm_closure_cnr = 3.0;
 
 catch_stalk_h = 5.0;
 catch_stalk_len = 50;
+catch_tip_th = 5;
 catch_head_th = 3;
 
 catch_pin_slop = 0.25; // each side, and above
@@ -609,7 +610,7 @@ module CatchAssemblyCoreProfile(){
            ]);
 }
 
-module CatchHeadProfile(){
+module CatchTipProfile(){
   intersection(){
     translate(cppF){
       difference(){
@@ -624,6 +625,9 @@ module CatchHeadProfile(){
              cppc,
              cppb ]);
   }
+}
+
+module CatchHeadProfile(){
   polygon([ cppd,
            cppg,
            cppf,
@@ -636,6 +640,9 @@ module CatchCore(){ /////toplevel
   linear_extrude(height=catch_strap_thick, convexity=10)
     CatchAssemblyCoreProfile();
 
+  linear_extrude(height=catch_tip_th, convexity=10)
+    CatchTipProfile();
+
   linear_extrude(height=catch_head_th, convexity=10)
     CatchHeadProfile();