ZP=0 9FmX^t$T
XDEG=0.5 YDEG=0.2 HKYJgx
PI=3.14159 p"o_0{8
POLARIZ Y 1 0 e18}`<tW-
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS #<gD@Jyb u
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 SAN/fnM
DISPLAY EALgBv>#ZL
PICTURE 'laser dioed' +t<'{KZ7;
RETURN laGIu0s{
~k/GmH
RAYS 0 )r6d3-p1
POLARIZ X kUQdi%3yY;
DECOMPOSE DIRECTION .99 20 +{@hD+
POLARIZ Y K)TMr"j\
DECOMPOSE DIRECTION .99 20 [TX5O\g![
POLARIZ Z h0Ilxa
DECOMPOSE DIRECTION .99 20