chiark / gitweb /
sewing-table: RoundCorner rework: correct centre
[reprap-play.git] / sewing-table.scad.m4
index 30a8d1d..3132b11 100644 (file)
@@ -244,11 +244,11 @@ m4_define(`ROUNDCORNER_VARS',`
   bigr= round_cnr_rad - round_edge_rad;
   l_uvec = unitvector2d(left_cnr - this_cnr);
   r_uvec = unitvector2d(right_cnr - this_cnr);
-  ctr = line_intersection_2d(
-      left_cnr  - clockwise2d(r_uvec) * round_cnr_rad,
-      this_cnr  - clockwise2d(r_uvec) * round_cnr_rad,
-      this_cnr  + clockwise2d(l_uvec) * round_cnr_rad,
-      right_cnr + clockwise2d(l_uvec) * round_cnr_rad )
+  lp1 = left_cnr  + clockwise2d(l_uvec) * bigr;
+  lp2 = this_cnr  + clockwise2d(l_uvec) * bigr;
+  lp3 = this_cnr  - clockwise2d(r_uvec) * bigr;
+  lp4 = right_cnr - clockwise2d(r_uvec) * bigr;
+  ctr = line_intersection_2d(lp1,lp2,lp3,lp4)
 ')
 
 module RoundCorner_selector(ci, adj) {