! Document name: bay30_hung_prism

!30_bay_hung_prism    17.07.1989.
!internal macro: -

pars a,b,frame thickness,pen No. of wall

pen d

rotx -90

prism 10,b,
a/2-0.5279-c/2,0.3048-c*0.866,
a/2,-1.1547*c,
a/2,0,
a/2+0.0508,0,
a/2-0.5211-0.232*c,0.3302+c*0.134,
-a/2+0.5211+0.232*c,0.3302+c*0.134,
-a/2-0.0508,0,
-a/2,0,
-a/2,-1.1547*c,
-a/2+0.5279+c/2,0.3048-c*0.866

del top
end