X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=sewing-table.scad.m4;h=9a091699d37c244106368363f463faf8f903cd3c;hp=76fda5d8ba6a00ca3ebe1c7b9a661e925ff6c091;hb=457cf6af6a0931a6baef7c51e49f2ca6dd02c135;hpb=64329221666a405143dd4899da9c843ef3d43d2b diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4 index 76fda5d..9a09169 100644 --- a/sewing-table.scad.m4 +++ b/sewing-table.scad.m4 @@ -205,6 +205,13 @@ module TileBase(botleft, topright){ } } +m4_dnl R_EDGE(c,ix) +m4_dnl c is from Rectangle_corners and +m4_dnl ix is a corner number +m4_dnl expands to two comma-separated corners: +m4_dnl that denoted by ix, and the next one anticlockwise +m4_define(`R_EDGE',`$1[$2],$1[(($2)+1)%4]') + m4_dnl INREFFRAME(left_cnr, right_cnr, morevars) { body; } m4_define(`INREFFRAME',` length_vec = ($2) - ($1); @@ -603,13 +610,6 @@ module Rectangle_TileBase(c) { TileBase(c[0], c[2]); } function Posts_interpolate_one(c0,c1) = [c0, (c0+c1)/2, c1]; -m4_dnl R_EDGE(c,ix) -m4_dnl c is from Rectangle_corners and -m4_dnl ix is a corner number -m4_dnl expands to two comma-separated corners: -m4_dnl that denoted by ix, and the next one anticlockwise -m4_define(`R_EDGE',`$1[$2],$1[(($2)+1)%4]') - module FitTest_general(c0,sz, dobrace=false){ c = Rectangle_corners(c0, sz); brace = [7,7,9];