ZP=0 pd?Mf=>#
XDEG=0.5 YDEG=0.2 wH*-(*N"
PI=3.14159 :'Vf
g[Uq
POLARIZ Y 1 0 td$E/h=3
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS <NMEGit
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 )+#` CIv
DISPLAY Y_liA
PICTURE 'laser dioed' GC-5X`Sq
RETURN cTifC1Pf
hDDn,uzpd
RAYS 0 9+|$$)
POLARIZ X R*,MfV
DECOMPOSE DIRECTION .99 20 Z{*\S0^ST
POLARIZ Y _;"il%l=1
DECOMPOSE DIRECTION .99 20 cZ,b?I"Q%
POLARIZ Z soxc0OlN
DECOMPOSE DIRECTION .99 20