ZP=0 *\gYs{,
XDEG=0.5 YDEG=0.2 z|bAZKSRYx
PI=3.14159 m)Ta5w^
POLARIZ Y 1 0 #fy3i+
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS Xrl# DN
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 ~)CGwST[
DISPLAY fb+_]{7g
PICTURE 'laser dioed' Ua%;hI)j$
RETURN pF/s5z
iVT)V>U p
RAYS 0 &8\6%C
POLARIZ X 2Y>#FEW/
DECOMPOSE DIRECTION .99 20 Y[!s:3\f
POLARIZ Y { k>T*/
DECOMPOSE DIRECTION .99 20 ,J(shc_F
POLARIZ Z ]$~\GE^
DECOMPOSE DIRECTION .99 20