- for (dx = [-plus, 0, plus])
- translate([dx, 0])
- circle(r= outerdia/2, $fn=6);
-
- intersection(){
- scale([cable_maxdia,
- cable_maxdia * delta_shift + cable_mindia * delta_ellipse])
- circle(r= sqrt(0.5) * delta_shift + 0.5 * delta_ellipse, $fn=4);
- circle(r= roundoff_rad, $fn=20);
- }
+ polygon([[-0.1, y_T_r * r0],
+ [x_T_r * r0, y_T_r * r0],
+ [x_B_r * r1, y_B_r * r1],
+ [x_B_r * r1 + wall_x_r * rnom + plus, y_B_r * r1],
+ [basew + plus, top],
+ [-0.1, top]]);
+ translate([0, -d_OC_r * r0])
+ circle(r = r0);
+ }
+}