mic-table-clamp: Break out StemWith (nfc)

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

diff --git a/mic-table-clamp.scad b/mic-table-clamp.scad
index 564f5043f03a1cbfce203210bbc64a268423b37e..c11ef0b52937f3e4e57ab3dfdddcb813bdcc0b34 100644 (file)
--- a/mic-table-clamp.scad
+++ b/mic-table-clamp.scad
@@ -71,11 +71,9 @@ module OurThread(l){
                  test=$test, length=l);
 }
 
-module Stem(){ ////toplevel
+module StemWith(){
   translate([0,0, stem_l -0.1])
-    english_thread(diameter=positive_dia/inch, threads_per_inch=16,
-                  leadin=1, test=$test,
-                  length= (positive_l + 0.1) / inch);
+    children();
 
   difference(){
     union(){
@@ -87,6 +85,13 @@ module Stem(){ ////toplevel
     }
     OurThread(stem_inner_l);
   }
+}  
+
+module Stem(){ ////toplevel
+  StemWith()
+    english_thread(diameter=positive_dia/inch, threads_per_inch=16,
+                  leadin=1, test=$test,
+                  length= (positive_l + 0.1) / inch);
 }
 
 module Wingnut(){ ////toplevel