! Document name: bay30_cas_prism

!bay30_cas_prism   15.07.1989.
!internal macro: -

material d

rotx -90

prism 10,b,
a/2-0.396-c/2,0.2286-c*0.866,
a/2,-1.1547*c,
a/2,0,
a/2+0.0508,0,
a/2-0.3892-0.232*c,0.254+c*0.134,
-a/2+0.3892+0.232*c,0.254+c*0.134,
-a/2-0.0508,0,
-a/2,0,
-a/2,-1.1547*c,
-a/2+0.396+c/2,0.2286-c*0.866

end