// -*- C -*-

// xxx
bolt_above = 4;
wall_thick = 4;
bolthole_height = 4;
bolthole_width = 10;
base_thick = 5;
lidinner_thick_allow = 20;
space = 25;
anchor_thick = 4;
anchor_rad = 4;
minbevel = space/2;

// calculated

uppA = [0,0];
uppB = uppA - [ wall_thick, 0 ];

uppL = [ uppB[0], -(lidinner_thick_allow + space + base_thick) ];
anchor_b = anchor_thick + anchor_rad;
uppM = uppL + anchor_b * [1,1];

bevel = max(minbevel, 2 * anchor_b * (1 + sqrt(0.5)));
uppE = uppL + bevel * [0,1];
uppF = uppL + bevel * [1,0];

uppJ = uppE + wall_thick * [ 1, tan(22.5) ];
uppI = uppF + base_thick + [ tan(22.5), 1 ];
uppH = upp

module UsualProfile(){