ZP=0 &
o5x
XDEG=0.5 YDEG=0.2 }Kp!,
PI=3.14159 mM,HMrgLqK
POLARIZ Y 1 0 1!<t8,W4
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS ><<>4(eF p
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 "b} mVrFh
DISPLAY [eX]x
PICTURE 'laser dioed' $Nu{c;7"
RETURN cFUD$mp
ubcB<=xb
RAYS 0 -&1(~7
POLARIZ X D'g,<-ahl
DECOMPOSE DIRECTION .99 20 7~Y\qJ4b
POLARIZ Y .XJ'2yKof
DECOMPOSE DIRECTION .99 20 H7zN|NdNw
POLARIZ Z {&=+lr_h?
DECOMPOSE DIRECTION .99 20