ZP=0 tR9iFv_
XDEG=0.5 YDEG=0.2 @^ta)Ev
PI=3.14159 m#[c]v{
POLARIZ Y 1 0 R*cef
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS Or$"f3gq
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 rkWy3X{%2<
DISPLAY p3-~cr.LD
PICTURE 'laser dioed' &X~8S/nPAw
RETURN f-i5tnh
]Q.S Is
RAYS 0 X7K{P_5l
POLARIZ X 1Z_w2D*
DECOMPOSE DIRECTION .99 20 fO5L[U^`
POLARIZ Y {I0!q"sF
DECOMPOSE DIRECTION .99 20 _-{=Z=?6}
POLARIZ Z ]QY-LO(
DECOMPOSE DIRECTION .99 20