! Document name: one_side_frame

!name:one sid.frame 26.04.1989.
!internal macro: -

pars width, height, frame thickness, sidelites width

let f=2 1/2"
prism 12,c,
0,0,
0,b,
a,b,
a,0,
a-f,0,
a-f,b-f,
a-f-d,b-f,
a-f-d,0,
a-2*f-d,0,
a-2*f-d,b-f,
f,b-f,
f,0

end