ZP=0 c5KJ_Nfi
XDEG=0.5 YDEG=0.2 MXQS6F#
PI=3.14159 .W[[Z;D
POLARIZ Y 1 0 nMz~.^Q-
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS :#yjg1aej
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 y[L7=Td
DISPLAY _dg2i|yP<
PICTURE 'laser dioed' I $5*Puy#
RETURN \1 ^qfw
*F ya
qJ)
RAYS 0 C`)n\?:Sth
POLARIZ X P5&mpl1
DECOMPOSE DIRECTION .99 20 627xR$U~
POLARIZ Y =%wwepz6
DECOMPOSE DIRECTION .99 20 ]7#@lL;'0
POLARIZ Z ZD)pdNX
DECOMPOSE DIRECTION .99 20