ZP=0 X
[IVK~D}z
XDEG=0.5 YDEG=0.2 {k*rD!tT
PI=3.14159 s;e%*4
POLARIZ Y 1 0 :%7y6V*
GAUSSIAN Z 0 2@(ZP) 2@1 2@0 (XDEG/2) (YDEG/2) RADIANS v7gs
$'Q
FIELD ENERGY (ZP) YX -2@0.0026356 -2@0.0009484 PIXELS 101 h]T
DISPLAY O$zXDxn
PICTURE 'laser dioed' x7J8z\b"O
RETURN _^w&k{T
bca4'`3\|
RAYS 0 +i^@QNOa
POLARIZ X e}>3<Dh
DECOMPOSE DIRECTION .99 20 ;O8'vp
POLARIZ Y 'tvX.aX2
DECOMPOSE DIRECTION .99 20 D=1:-aLP7
POLARIZ Z >n$V1U&/
DECOMPOSE DIRECTION .99 20