ZP=0 4oueLT(zc
XDEG=0.5 YDEG=0.2 u:2Ll[ eo
PI=3.14159 |:JT+a1
POLARIZ Y 1 0 s</qT6@
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS z\A
),;
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 KXK5\#+L
DISPLAY `&7tADFB
PICTURE 'laser dioed' m,!SDCq
RETURN 9A} *
r{9fm,
RAYS 0 .#$2,"8
POLARIZ X FX|&o>S(8
DECOMPOSE DIRECTION .99 20 c$71~|-[
POLARIZ Y 3B
'j?+A
DECOMPOSE DIRECTION .99 20 3^~J;U!3
POLARIZ Z _"L6mcI6
DECOMPOSE DIRECTION .99 20