ZP=0 [j]}$fFe
XDEG=0.5 YDEG=0.2 >:(6{}b
PI=3.14159 3g4vpKg6c
POLARIZ Y 1 0 AqTR.}H
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS Jc9@VxWY
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 ^*j[&:d
DISPLAY _CYmG"mY
PICTURE 'laser dioed' ]a&x'
RETURN xV
}:M
fwz5{>ON]
RAYS 0 O#<|[Dzw
POLARIZ X 2\kC_o97
DECOMPOSE DIRECTION .99 20 fbW,0
POLARIZ Y A@fshWrl%
DECOMPOSE DIRECTION .99 20 g%KGF)+H
POLARIZ Z q|de*~@-P
DECOMPOSE DIRECTION .99 20