X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=osstest-arm-net-bracket.scad;h=a02f17dbd2abecf7a43affb5308583b8da23aa34;hp=248e1b21521f789c7fb0615ce4a8e69de42392c6;hb=995f08a03e9c00527db3769dab9008b3e1dfd2d0;hpb=91d08486b06a72288baed6bba5cfa8dd3ed0fbaf

diff --git a/osstest-arm-net-bracket.scad b/osstest-arm-net-bracket.scad
index 248e1b2..a02f17d 100644
--- a/osstest-arm-net-bracket.scad
+++ b/osstest-arm-net-bracket.scad
@@ -5,7 +5,7 @@ tonguewidth = 10;
 totaldepth = 26;
 thick = 3;
 tabover = 7;
-tabunder = 20;
+tabunder = 15;
 
 tabside = 7;
 
@@ -16,6 +16,16 @@ ridgewidth = 2;
 
 holedia = 3.5;
 
+module Tongue(tw,tt,ad){
+  difference(){
+    translate([-tw, 0, 0])
+      cube([tw, ad, tt+strapthick]);
+    for (y=[thick+0.1, ad-ridgewidth-strapwidth])
+      translate([-tw-1, y, tt])
+	cube([tw+2, strapwidth, strapthick+1]);
+  }
+}
+
 module Object(){
   difference(){
     translate([-holedist-tabside, 0, 0])
@@ -25,13 +35,7 @@ module Object(){
 	rotate([-90,0,0])
 	cylinder(r= holedia/2+0.5, h=thick+2, $fn=20);
   }
-  difference(){
-    translate([-tonguewidth, 0, 0])
-      cube([tonguewidth, totaldepth, tonguethick+strapthick]);
-    for (y=[thick+0.1, totaldepth-ridgewidth-strapwidth])
-      translate([-tonguewidth-1, y, tonguethick])
-	cube([tonguewidth+2, strapwidth, strapthick+1]);
-  }
+  Tongue(tonguewidth,tonguethick,totaldepth);
 }
 
 Object();