$ASSIGN POOLC:BDFP00LIT2.DAT FOR009 $ASSIGN gridp00:ap00t10000g40k2.DAT FOR003 $ASSIGN gridp00:Fp00t10000g40k2.DAT FOR007 $RUN ATLAS9:ATLAS9v SURFACE FLUX FREQUENCIES 1221 81 1221 LITTLE ITERATIONS 1 PRINT 2 PUNCH 2 READ PUNCH BEGIN END