+module DiagonaliseNearHinge(wider){
+ sz = spp0[1] - spp30[1] + gap[1];
+
+ for (my=[0,1]) mirror([0,my,0]) {
+ translate([-etxa, -nook_h/2, 0])
+ mirror([1,0,0])
+ linextr_y_xz(spp31[0] - wider, spp30[0] + gap[0] + 0.1)
+ translate([ 0, spp30[1] ])
+ polygon([[ -1, 0 ],
+ [ 0, 0 ],
+ [ sz/diag_near_hinge_slope, sz ],
+ [ sz/diag_near_hinge_slope, sz + 0.1 ],
+ [ -1, sz + 0.1 ]]);
+ }
+}
+