+}
+
+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 StemBlankPart(){
+ hull(){
+ cylinder(h = blank_l + 0.1 - blank_taper,
+ r = positive_blank_dia/2);
+ cylinder(h = blank_l + 0.1,
+ r = positive_blank_dia/2 - blank_taper);
+ }
+}
+
+module BlankStem(){ ////toplevel
+ StemWith()
+ StemBlankPart();