+}
+
+module FitTest_Entire(){ ////toplevel
+ FitTest_general([-40,-80], [275,180], dobrace=true);
+}
+
+module FitTest_RearCurve(){ ////toplevel
+ FitTest_general([110,0], [170,100]);
+}
+
+module FitTest_FrontCurve(){ ////toplevel
+ p0 = [110,-80];
+ sz = [170,80];
+ intersection() {
+ Tile00();
+ translate([0,0,-8]) linear_extrude(height=18) {
+ translate(p0) square(sz);
+ }
+ }
+}
+
+module FitTest_PairLink(adjust=0){ ////toplevel
+ cy0=-55; cy1=85; cx=130;
+ bar = [10,10];
+ legrad = 15;
+ footrad_min = 4; footrad_max = 6; footrad_depth = 3;
+
+ translate([cx - bar[0]/2, cy0, 0])
+ cube([bar[0], cy1-cy0, bar[1]]);
+ for (endy=[cy0,cy1]) {
+ translate([cx,endy,0]){
+ for (rot=[0:90:270]) {
+ rotate(rot){
+ translate([legrad,0,0]){
+ hull(){
+ cylinder(r= footrad_max, height=1);
+ translate([0,0,-footrad_depth])
+ cylinder(r= footrad_min, height=1);
+ }
+ }
+ }
+ }
+ }
+ }
+}
+
+module FitTest_PairDemo(){ ////toplevel
+ %FitTest_FrontCurve();
+ %FitTest_RearCurve();
+ FitTest_PairLink();
+}
+
+module RoundCornerDemo_plat(cnr){
+ mirror([0,0,1]) linear_extrude(height=1) polygon(cnr);
+}
+
+module RoundCornerDemo(){ ////toplevel
+ cnr = [ [-2,-3], [13,-3], [-12,9] ];
+ translate([0,25,0]) RoundCornerDemo_plat(cnr);
+ translate([25,0,0]) RoundCornerAdd(cnr);
+ translate([-25,0,0]) RoundCornerCut(cnr);
+ translate([0,-25,0]) RoundCorner_selector(cnr, 0);
+ difference(){
+ RoundCornerDemo_plat(cnr);
+ RoundCornerCut(cnr);
+ }
+ RoundCornerAdd(cnr);