ZP=0 S{l)hwlE
XDEG=0.5 YDEG=0.2 cOdRb=?9
PI=3.14159 uZL,%pF3A
POLARIZ Y 1 0 s|XWw<Sa
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS sdO8;v>
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 <S7SH-{_\
DISPLAY WynTU?
PICTURE 'laser dioed' EmO[-W|2
RETURN Jy}~ZY
<?IDCOt ?
RAYS 0 NX%1L!
#
POLARIZ X BQWgL
DECOMPOSE DIRECTION .99 20 &D[M<7T
POLARIZ Y }a!|n4|`
DECOMPOSE DIRECTION .99 20 ,sc#l<v
POLARIZ Z 53aJnxX
DECOMPOSE DIRECTION .99 20