+module ArmExtender(){ ////toplevel
+ DoveClipExtender(length=exteffrad-hubeffrad,
+ ha=doveclipheight,
+ hb=doveclipheight);
+}
+
+module AxlePin(){ ////toplevel
+ pinr = axlepinrad - slop;
+ intersection(){
+ translate([0, 0, pinr*0.7]) {
+ translate([0, -washerrad, 0]) rotate([-90,0,0])
+ cylinder(r=pinr, h=washerrad*2, $fn=10);
+ translate([-axlepintabrad, hubaxlerad, -axlepinrad])
+ cube([axlepintabrad*2, axlepinrad*2, axlepinrad*2]);
+ }
+ translate([-50,-50,0]) cube([100,100,50]);
+ }
+}
+
+module Axle(){ ////toplevel
+ pillarswidth = DoveClipPairSane_width(towerclipcount);
+
+if(0)
+ translate([-axlehorizoffset, -axlevertheight, 0]) {
+ rotate([0,0,-90])
+ DoveClipPairSane(h=towercliph, count=towerclipcount, baseextend=3);
+ translate([0, DoveClip_depth(), 0])
+ rotate([0,0,90])
+ ExtenderPillars(axlevertheight - DoveClip_depth(),
+ pillarswidth, towercliph,
+ pillarw=towerpillarw);
+ }
+
+ axleclearlen = hubaxlelen + slop*3 + washerthick*2;
+ axlerad = hubaxlerad-slop;
+ bump = axlerad * 0.2;
+ shift = axlerad-bump;
+ joinbelowallow = 3;
+
+ intersection(){
+ translate([0, 0, shift]) {
+ difference() {
+ union(){
+ translate([-1, 0, 0])
+ rotate([0,90,0])
+ cylinder(r = axlerad, h = 1 + axleclearlen + 3 + 2);
+ mirror([1,0,0]) rotate([0,90,0])
+ cylinder(r = washerrad, h = 3);
+if(0)
+ intersection(){
+ mirror([1,0,0]) rotate([0,90,0])
+ cylinder(r = towercliph - shift,
+ h = pillarswidth/2 + axlehorizoffset);
+ translate([-50, -joinbelowallow, -50])
+ cube([100, joinbelowallow+50, 100]);
+ }
+ }
+ rotate([90,0,0])
+ translate([axleclearlen + axlepinrad/2, 0, -25])
+ cylinder(r=axlepinrad, h=50);
+ }
+ }
+ translate([-50,-50,0]) cube([100,100,100]);
+ }
+}
+
+module AxleWasher(){ ////toplevel
+ difference(){
+ cylinder(h=washerthick, r=washerrad);
+ translate([0,0,-1]) cylinder(h=washerthick+2, r=hubaxlerad+slop);
+ }
+}
+