+module ImplHeadCupTest(){ ////toplevel
+ for (r=[0,180])
+ rotate([0,0,r])
+ translate([-17,0,0])
+ ImplHeadCup();
+}
+
+module SomeStrap(width){
+ // children(0) is to add, (1) subtract
+ difference(){
+ union(){
+ cylinder(r=sm_outer_rad, h=width);
+ StrapMountProtrusion(smc_cnr_c_x + sm_closure_cnr,
+ smc_max_y,
+ sm_closure_cnr,
+ width);
+ children(0);
+ }
+ translate([0,0,-1])
+ cylinder(r=sm_inner_rad, h=width+2);
+ translate(smc_pos)
+ StrapMountBolt(10, width);
+ translate(smc_pos)
+ cube([ sm_bolt_tighten_allow, 40,100 ], center=true);
+ children(1);
+ }
+}
+
+module StrapMountBolt(l_delta, strap_width){ ///toplevel
+ // positioned relative to smc_pos
+ translate([(smc_bolt_nut_eff_thick - sm_bolt_head_thick)/2,
+ smc_bolt_y,
+ strap_width/2]){
+ translate([ -sm_bolt_shaft/2-1, 0,0 ]){
+ rotate([0,90,0]) cylinder(r= sm_bolt_dia/2, h= sm_bolt_shaft+2);
+ }
+ translate([ -sm_bolt_shaft/2, 0,0 ])
+ rotate([0,-90,0])
+ cylinder($fn=6, r=smc_bolt_nut_dia/2,
+ h=smc_bolt_nut_eff_thick + l_delta);
+ translate([ sm_bolt_shaft/2, 0,0 ])
+ rotate([0,90,0])
+ cylinder(r=sm_bolt_head_dia/2, h=sm_bolt_head_thick + l_delta);
+ }
+}
+
+module StrapMountProtrusion(half_x, max_y, cnr, width){
+ translate(smc_pos){
+ linear_extrude(height=width, convexity=10){
+ hull(){
+ for (m = [0,1]) mirror([m,0,0]) {
+ translate([-(half_x - cnr), max_y - cnr])
+ circle(r=cnr);
+ translate([-half_x, -sm_inner_rad])
+ square([1,1]);
+ }
+ }
+ }
+ }
+}
+
+module StrapMount(){ ////toplevel
+ SomeStrap(sm_main_width){
+ rotate([0,0,180]){
+ StrapMountProtrusion(strap_hoop_inside/2 + strap_hoop_thick,
+ strap_hoop_thick,
+ sm_closure_cnr);
+ translate(smc_pos +
+ [0,0, sm_main_width] +
+ strap_hoop_thick * [ 0, 0.5, -1.0 ])
+ StrapHoop();
+ }
+ union(){ };
+ }
+}
+
+module CatchAssemblyCoreProfile(){
+ difference(){
+ union(){
+ hull(){
+ translate(cpp3) circle(r= catch_cr3);
+ polygon([ cpp3,
+ cpp2r,
+ cpp5,
+ cpph,
+ cppd
+ ]);
+ }
+ polygon([cppD,
+ cppC,
+ cpp9,
+ cpp10,
+ cpp11,
+ cpp4,
+ cpp2r,
+ cpp2d,
+ cppA,
+ cppE
+ ]);
+ translate(cpp8) circle(r= catch_cr);
+ }
+ hull(){
+ translate(cpp4) circle(r= catch_cr);
+ translate(cpp5) circle(r= catch_cr);
+ translate(cpp7) circle(r= catch_cr);
+ polygon([cpp4,
+ cppg,
+ cpph,
+ cpp10,
+ cpp11,
+ ]);
+ }
+ translate(cpp2) circle(r= catch_cr);
+ }
+ // if cpp11 is above cpp10, the subtracted hull above
+ // can go down too far. Ensure we do not cut off below cppy6.
+ polygon([ cppE,
+ cppD,
+ cpp9,
+ [ cpp9[0], cppy6 ],
+ [ cpp7[0] - catch_cr, cppy6 ],
+ cpp2d
+ ]);
+}
+
+module CatchTipProfile(dy){
+ ddy = [0,dy];
+ intersection(){
+ translate(cppF){
+ difference(){
+ circle(r = dist2d(cppF, cppd));
+ //circle(r = dist2d(cppF, cppa));
+ }
+ }
+ polygon([ cppa,
+ cppi + ddy,
+ cppd + ddy,
+ cppc,
+ cppb ]);
+ }
+}
+
+module CatchHeadProfile(){
+ polygon([ cppd,
+ cppd,
+ cppi,
+ cppf,
+ cppe,
+ cpph ]);
+}
+
+
+module CatchCore(){ /////toplevel
+ linear_extrude(height=catch_strap_thick, convexity=10)
+ CatchAssemblyCoreProfile();
+
+ hull(){
+ linear_extrude(height=catch_head_th, convexity=10)
+ CatchTipProfile(0);
+ linear_extrude(height=catch_tip_th, convexity=10)
+ CatchTipProfile(catch_tip_th - catch_head_th);
+ }
+
+ linear_extrude(height=catch_head_th, convexity=10)
+ CatchHeadProfile();
+
+ translate(concat(cppB,[0])) hull(){
+ translate([0,0, catch_knob_height + catch_head_th - catch_knob_dia/2])
+ sphere(r = catch_knob_dia/2);
+ cylinder(r = catch_knob_dia/2, h = 0.1);
+ }
+}
+
+module CatchPreDistort(){ /////toplevel
+ scale(100 / sm_inner_rad)
+ rotate([90,0,0])
+ CatchCore();
+}
+
+module CatchAssembly(){ /////toplevel
+ rotate([0,0, -(cppe[0] + cppB[0] + catch_pin_slop) / sm_inner_rad * 360/TAU])
+ translate([0,0, catch_assembly_dy])
+ scale(sm_inner_rad / 100)
+ import(str("poster-tube-lid,CatchPostDistort-fa",
+ (coarse ? 20 : 3),
+ ".stl"),
+ convexity=20);
+
+ SomeStrap(catch_strap_width){
+ union(){ }
+ union(){
+ translate([-200, -200, -200])
+ cube([400, 200, 400]);
+ }
+ }
+}
+
+module CatchDemo(){ /////toplevel
+ color("blue") translate([0,0,
+ -catch_assembly_dy
+ ])
+ CatchAssembly();
+ translate([0,0,+side_height
+ ])
+ Cover();
+}
+
+module CatchDemoS(){ /////toplevel
+ color("blue") translate([0,0,
+ -catch_assembly_dy
+ ])
+ CatchAssembly();
+ intersection(){
+ translate([0,0,+side_height
+ ])
+ Cover();
+ mirror([0,1,0]) translate([-250,33,0]) cube([500,500,500]);
+ }
+ color("black")
+ translate([0,-33,0])
+ cube([6.15, 2,2], center=true);
+}
+
+module CatchPinProfileDemo(){ /////toplevel
+ echo("G ",
+ cpp2[0] - cpp1[0],
+ bayo_n[0] - bayo_e[0]);
+ color("blue") translate([0,0,
+ +1,
+ ]) {
+ CatchAssemblyCoreProfile();
+ CatchHeadProfile();
+ }
+ polygon(bayo_polygon, convexity=10);
+}
+