+module FilamentCupHandle(){
+ pawlusewidth = ratchetpawl-ratchettoothsmoothr*2;
+ mirror([0,1,0]) {
+ cube([stalklength, prongwidth, prongthick]);
+ translate([stalklength, prongwidth/2, 0])
+ cylinder(r=prongwidth/2, h=prongthick, $fn=20);
+ translate([ratchettoothsmoothr, prongwidth, 0]) {
+ minkowski(){
+ cylinder($fn=20,r=ratchettoothsmoothr, h=1);
+ multmatrix([ [ 1, -ratchettoothslope, 0, 0 ],
+ [ 0, 1, 0, 0 ],
+ [ 0, 0, 1, 0 ],
+ [ 0, 0, 0, 1 ]])
+ cube([pawlusewidth,
+ ratchettoothheight - ratchettoothsmoothr,
+ prongthick]);
+ }
+ }
+ }
+}
+
+module FilamentCupCup(){
+ xstraight = cupbigrad;
+ linear_extrude(height=prongthick) {
+ FlatArc(0,0, cupbigrad,cupbigrad+prongwidth, 89,271, $fn=80);
+ }
+ for (my=[0,1]) mirror([0,my,0]) {
+ translate([0,cupbigrad,0])
+ cube([xstraight, prongwidth, prongthick]);
+ }
+}
+
+module FilamentCup() {
+ FilamentCupHandle();
+
+ dx = cupbigrad + prongwidth;
+ dy = cupbigrad + prongwidth + overclipcupgap;
+
+ translate([dx, dy, 0])
+ FilamentCupCup();
+ translate([0, -1, 0]);
+ cube([prongwidth, dy+1, prongthick]);
+
+ propshift = stalklength - overclipheight - prongthick;
+ proptaken = propshift + prongthick;
+ echo(cupbigrad, dx, propshift, proptaken);
+
+ translate([propshift, -1, 0])
+ cube([prongwidth,
+ sqrt(cupbigrad*cupbigrad - proptaken*proptaken)
+ + overclipcupgap + prongthick + 1,
+ prongthick]);
+}
+
+//ArmEnd();
+FilamentCup();