+module RailProfile(lslop=0.1){
+ yt_base = thinbox_front_z;
+ yt = yt_base - lid_rail_behindslop;
+ pegx = (lid_inner_w_nom - patbox_centres)/2;
+
+ polygon([[-lslop, yt],
+ [pegx - peg_main_dia/2, yt],
+ [pegx - peg_main_dia/2, yt_base - peg_straight_len],
+ [-lslop,
+ yt_base - peg_straight_len - (pegx - peg_main_dia/2)/peg_slope
+ -0.1]]);
+}
+