+module FitTest_RearCurve(){ ////toplevel
+ difference(){
+ FitTest_general([110,0], [170,100]);
+ FitTest_PairLink(true);
+ }
+}
+
+module FitTest_FrontCurve(){ ////toplevel
+ p0 = [110,-80];
+ sz = [170,80];
+ difference(){
+ intersection() {
+ Tile00();
+ translate([0,0,-8]) linear_extrude(height=18) {
+ translate(p0) square(sz);
+ }
+ }
+ FitTest_PairLink(true);
+ }
+}
+
+module FitTest_Entire(){ ////toplevel
+ difference(){
+ FitTest_general([-40,-80], [275,180], dobrace=true);
+ FitTest_PairLink(true);
+ }
+}
+
+module FitTest_EntireDemo(){ ////toplevel
+ FitTest_Entire();
+ %Tile00();
+}
+