ZP=0 _@OYC<
XDEG=0.5 YDEG=0.2 H0(zE*c~
PI=3.14159 \QMSka>
POLARIZ Y 1 0 .FXQ,7mZ-
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS :9h8q"T
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 &"kx(B
DISPLAY H);'\]_'x
PICTURE 'laser dioed' ^r& {V"l]
RETURN W_
6Jl5]
rODKM-7+
RAYS 0 v4zd
x)
POLARIZ X =0)^![y]v
DECOMPOSE DIRECTION .99 20 u=l(W(9=
POLARIZ Y kxmS
DECOMPOSE DIRECTION .99 20 L,D>E
POLARIZ Z i@J,u
DECOMPOSE DIRECTION .99 20