From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 5 Nov 2022 13:29:15 +0000 (+0000)
Subject: topeak-mtx-tortec-expeditionrack-adapter: break out
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=ac16fef7af37438bb2ba244916125b8ba4ba4a1d;p=reprap-play.git

topeak-mtx-tortec-expeditionrack-adapter: break out

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

diff --git a/topeak-mtx-tortec-expeditionrack-adapter.scad b/topeak-mtx-tortec-expeditionrack-adapter.scad
index fce69cc..256f07c 100644
--- a/topeak-mtx-tortec-expeditionrack-adapter.scad
+++ b/topeak-mtx-tortec-expeditionrack-adapter.scad
@@ -220,6 +220,20 @@ module FamLinextr(){
     children();
 }
 
+module FamGraspElevation(){
+  hull(){
+    ybot = $rack_rail_y - rack_rail_dia/2 + grasp_large_r
+      - fit_slope_len * 0.5;
+    for (y = [
+	      ybot,
+	      adapt_main_top_y - grasp_large_r
+	      ])
+      for (dx= [-1,+1] * rack_rail_dia/2)
+	translate([ -$foreaftmaint_rail_z + dx, y ])
+	  circle(r= grasp_large_r);
+  }
+}
+
 module Principal(){
   // calculated
   $rack_rail_y = rack_rail_y_of_elevation($elevation_nominal);
@@ -275,17 +289,7 @@ module Principal(){
 		rectfromto([ -$foreaftmaint_rail_z, adapt_main_top_y ],
 			   [ 0, block_y_min]);
 	    difference(){
-		hull(){
-		  ybot = $rack_rail_y - rack_rail_dia/2 + grasp_large_r
-		    - fit_slope_len * 0.5;
-		  for (y = [
-			    ybot,
-			    adapt_main_top_y - grasp_large_r
-			    ])
-		    for (dx= [-1,+1] * rack_rail_dia/2)
-		      translate([ -$foreaftmaint_rail_z + dx, y ])
-			circle(r= grasp_large_r);
-		}
+              FamGraspElevation();
 	      translate([0, adapt_main_top_y])
 		 rectfromto([-500, 0], [500, 500]);
 	    }