$ASSIGN POOLC:BDFP00LIT2.DAT FOR009 $ASSIGN gridp00:ap00t10000g40k2.DAT FOR003 $ASSIGN gridp00:ip00t10000g40k2.DAT FOR007 $RUN ATLAS9:ATLAS9v SURFACE INTENSI 17 1.,.9,.8,.7,.6,.5,.4,.3,.25,.2,.15,.125,.1,.075,.05,.025,.01 FREQUENCIES 1221 81 1221 LITTLE ITERATIONS 2 PRINT 2 0 PUNCH 2 0 READ PUNCH BEGIN END