ZP=0 GNhtnB
XDEG=0.5 YDEG=0.2 7&;[an^w
PI=3.14159 d8Q_6(Ar|
POLARIZ Y 1 0 ?=;e.qK=71
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS GibggOj2Q,
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 xG *lV|<7>
DISPLAY /RA1d<~$q
PICTURE 'laser dioed' 2a._?(k_y
RETURN -V;0_Nx7p
5XSxQG@k^z
RAYS 0 W2r6jm!
POLARIZ X GL;x:2XA
DECOMPOSE DIRECTION .99 20 ;
McIxvj
POLARIZ Y <?q&PCAn^
DECOMPOSE DIRECTION .99 20 R,d70w
(_
POLARIZ Z LyJTK1]#
DECOMPOSE DIRECTION .99 20