ZP=0 WM7oM~&{6
XDEG=0.5 YDEG=0.2 ~:kZgUP_f
PI=3.14159 rzhWw-GY
POLARIZ Y 1 0 8_BV:o9kL
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS eL10Q(;P`
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 U\4g#!qj
DISPLAY 8uc1iB
PICTURE 'laser dioed' wSzv|\
G
RETURN [842&5Pd?
&=Ar
RAYS 0 OE_XCZ!5P
POLARIZ X @=bLDTx;c)
DECOMPOSE DIRECTION .99 20 ]/[FR 5>
POLARIZ Y A-Sv;/yD_
DECOMPOSE DIRECTION .99 20 xu/cq9
POLARIZ Z N..yQ-6x?
DECOMPOSE DIRECTION .99 20