ZP=0 |M_Bbo@ud
XDEG=0.5 YDEG=0.2 8hg(6 XUG
PI=3.14159 3R><AFMY?
POLARIZ Y 1 0 H5{J2M,f
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS D>Z_N?iR
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 'z'm:|JW
DISPLAY ='j
PICTURE 'laser dioed' W|
p?KJk)
RETURN FzIA>njt
{cA )jW\'
RAYS 0 @:I/lg=Qd
POLARIZ X ?6bE!36
DECOMPOSE DIRECTION .99 20 s>X;m.<
POLARIZ Y ^-_!:7TH]
DECOMPOSE DIRECTION .99 20 $;1~JOZh
POLARIZ Z .y!Hw{cq
DECOMPOSE DIRECTION .99 20