chiark / gitweb /
cable-splice-clamp: introduce top and basew, and size top thickness by r1
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 13 Feb 2016 17:27:19 +0000 (17:27 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 13 Feb 2016 17:27:19 +0000 (17:27 +0000)
cable-splice-clamp.scad

index dd376d6..55f219a 100644 (file)
@@ -58,6 +58,9 @@ top_r = wall_r - (d_OC_r - 1);
 
 wall_x_r = wall_r / tan(90-alpha);
 
+top = top_r * r1;
+basew = base_r * rnom;
+
 echo(r0,r1, "ratio",r1/r0);
 
 module CrossSection(plus=0) {
@@ -66,8 +69,8 @@ module CrossSection(plus=0) {
             [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],
-            [base_r * rnom                + plus, top_r * rnom],
-            [-0.1,                                top_r * rnom]]);
+            [basew                        + plus, top],
+            [-0.1,                                top]]);
     translate([0, -d_OC_r * r0])
       circle(r = r0);
   }