C,MAINDPH>DEFB0WRITOBARENDOBAPREADOBA RSVOBA0NEBBEXITBBPRDAOBB WDAOBB0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA HALAHXE)HAJDCMAIN LAIBLAIHSLAHXTHAYHA+DA LAHXMDC HA4HA7HA:HA=HAAHAAID APBXCPCTCXEPGUPHTJV4LAHXA HAE)HAE)LAIHSLAIBDDABACLCXLAHXAULAHXA!LAHXA^LAHX4DBADLCXLAHXAXLAHXA$LAHXA^LAHX7DBAELDXLAHXARLAHXHVLEXDBAFLFXLAHXARLAHXH+LGXDA2MLGXDA2NLEXDDAGBMRRLAHHF)LIIXDNAHBX"MJS2KAIBX"NJS2LAJLDXLAHXARLAHXGIDABKLGXDABLLGXLEXDBAKLAHXGNDK(1H ,2 6)ALBS2JAMLJXLAHXAULAHX4ADBAA>+LGXLA4ME)LAQHG\LEXDBANLKXLAHXAXLAHX7DBAA>+LADME)LGXLAQHG.LEXDFAOBJJS2JRXLAHPGRDBAPLDXLAHXARLAHXH5DABKLGXDABLLGXLEXDBAQLAHXFIDBARLAHXH DS(1H1, INPUT MAN5,MAN6(I2,1X,I2) )ASLAHXH1DH( 2(I2,1X))ATLAHXH:DG(1H ,2I6)AULIIXAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA Note: Lines longer than 256 characters were wrapped