From ca114e8a94848a3ae033c801bbbb282a8a871c96 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 23 Oct 2014 17:19:04 +0100
Subject: [PATCH] osstest-arm-net-bracket: break out Tongue (nfc)

---
 osstest-arm-net-bracket.scad | 18 +++++++++++-------
 1 file changed, 11 insertions(+), 7 deletions(-)

diff --git a/osstest-arm-net-bracket.scad b/osstest-arm-net-bracket.scad
index 6e88ffc..21cc748 100644
--- a/osstest-arm-net-bracket.scad
+++ b/osstest-arm-net-bracket.scad
@@ -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, totaldepth-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();
-- 
2.30.2