ZP=0 //#xK D
XDEG=0.5 YDEG=0.2 jz{(q;
PI=3.14159 x?%rx}h
POLARIZ Y 1 0 pi^^L@@d
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS R2Twm!1
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 g,00'z_D
DISPLAY }s`jl``PM
PICTURE 'laser dioed' C_;HaQiu
RETURN &Pmc"9Rl
di-O*ug
RAYS 0 b}ySZlmy
POLARIZ X hknwis%y
DECOMPOSE DIRECTION .99 20 BengRG[
POLARIZ Y e#l*/G*,
DECOMPOSE DIRECTION .99 20 Z-N-9E
POLARIZ Z Vpug"aR&_
DECOMPOSE DIRECTION .99 20