ZP=0 [X-Q{c4
XDEG=0.5 YDEG=0.2
W6a2I
PI=3.14159 5Zq- |"|
POLARIZ Y 1 0 jReI+
pS
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS :dK%=j*ZK
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 0S' EnmG
DISPLAY 0]" j,
PICTURE 'laser dioed' ak NJL\b
RETURN d>(dSKx
XL+kEZ|3
RAYS 0 &;y(@e}D
POLARIZ X ] $%{nj<
DECOMPOSE DIRECTION .99 20 0[PP-]JS
POLARIZ Y o77HRX
DECOMPOSE DIRECTION .99 20 ^@6eN]
POLARIZ Z Y<{j':
DECOMPOSE DIRECTION .99 20