ZP=0 :nn(Ndlz9
XDEG=0.5 YDEG=0.2 1aS66TS3
PI=3.14159 Tw@:sWC
POLARIZ Y 1 0 @9\L|O'~?
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS OHK]=DH:M
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 MBO>.M$B
DISPLAY ?.6fVSa
PICTURE 'laser dioed' lzK,VZ=mM
RETURN *s (L!+
i1DJ0xC]
RAYS 0 e)2w&2i`(F
POLARIZ X {:ZsUnzm
DECOMPOSE DIRECTION .99 20 (<ngdf`,
POLARIZ Y D:fLQ8a
DECOMPOSE DIRECTION .99 20 K%3{a=1
POLARIZ Z CNrK]+>
DECOMPOSE DIRECTION .99 20