ZP=0 #79[Qtkrhm
XDEG=0.5 YDEG=0.2 V5z2.} 'o-
PI=3.14159 Dzf\m>H[
POLARIZ Y 1 0 }#7rg_O]>
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS ; Byt'S
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 tP7<WGHd/
DISPLAY OtmDZ.t;`
PICTURE 'laser dioed' >Vjn]V5y
RETURN 4&sf{tI
dN)8r
RAYS 0 9`*Eeb>
POLARIZ X w9G|)UDib
DECOMPOSE DIRECTION .99 20 h_[{-WC
POLARIZ Y +tT"
DECOMPOSE DIRECTION .99 20 gTXpaB<
POLARIZ Z M|mfkIk0MB
DECOMPOSE DIRECTION .99 20