Annotation of researchv10no/cmd/pfort/sum2, revision 1.1

1.1     ! root        1: C XXXXXtt2
        !             2: BLOCKDATA0.f:
        !             3:    BLOCK DATA:
        !             4: BLOCKDATA1.f:
        !             5:    BLOCK DATA:
        !             6: BLOCKDATA2.f:
        !             7:    BLOCK DATA:
        !             8: BLOCKDATA3.f:
        !             9:    BLOCK DATA:
        !            10: MAIN0.f:
        !            11:    MAIN:
        !            12: COMPIL.f:
        !            13:    compil:
        !            14: OVRLAY.f:
        !            15:    ovrlay:
        !            16: SATT1.f:
        !            17:    satt1:
        !            18: IGATT1.f:
        !            19:    igatt1:
        !            20: EXCH.f:
        !            21:    exch:
        !            22: SSORT.f:
        !            23:    ssort:
        !            24: ERROR1.f:
        !            25:    error1:
        !            26: ERROR2.f:
        !            27:    error2:
        !            28: ARDECL.f:
        !            29:    ardecl:
        !            30: ASSASF.f:
        !            31:    assasf:
        !            32: ASSIGN.f:
        !            33:    assign:
        !            34: COMMON.f:
        !            35:    common:
        !            36: DIMENS.f:
        !            37:    dimens:
        !            38: DOCHK.f:
        !            39:    dochk:
        !            40: DOSPEC.f:
        !            41:    dospec:
        !            42: DOVAR.f:
        !            43:    dovar:
        !            44: EQUIV.f:
        !            45:    equiv:
        !            46: EXTERN.f:
        !            47:    extern:
        !            48: FIXLAB.f:
        !            49:    fixlab:
        !            50: FORMAT.f:
        !            51:    format:
        !            52: GETTOK.f:
        !            53:    gettok:
        !            54: GOTO.f:
        !            55:    goto:
        !            56: ID.f:
        !            57:    id:
        !            58: IDLIST.f:
        !            59:    idlist:
        !            60: IFS.f:
        !            61:    ifs:
        !            62: INTEXT.f:
        !            63:    intext:
        !            64: IO.f:
        !            65:    io:
        !            66: LDOVAR.f:
        !            67:    ldovar:
        !            68: NEXTOK.f:
        !            69:    nextok:
        !            70: OUTSYM.f:
        !            71:    outsym:
        !            72: POP.f:
        !            73:    pop:
        !            74: RDLIST.f:
        !            75:    rdlist:
        !            76: RFLIST.f:
        !            77:    rflist:
        !            78: SEPAR.f:
        !            79:    separ:
        !            80: SETNAM.f:
        !            81:    setnam:
        !            82: SORT.f:
        !            83:    sort:
        !            84: SUBS.f:
        !            85:    subs:
        !            86: SUBFCN.f:
        !            87:    subfcn:
        !            88: TOKCOM.f:
        !            89:    tokcom:
        !            90: TOKLAB.f:
        !            91:    toklab:
        !            92: TOKLOG.f:
        !            93:    toklog:
        !            94: TOKLOP.f:
        !            95:    toklop:
        !            96: TOKPNO.f:
        !            97:    tokpno:
        !            98: TOKRL.f:
        !            99:    tokrl:
        !           100: TYPE.f:
        !           101:    type:
        !           102: TYPST.f:
        !           103:    typst:
        !           104: TYPST2.f:
        !           105:    typst2:
        !           106: SATT2.f:
        !           107:    satt2:
        !           108: IGATT2.f:
        !           109:    igatt2:
        !           110: CALLS.f:
        !           111:    calls:
        !           112: DATA.f:
        !           113:    data:
        !           114: DOSTMT.f:
        !           115:    dostmt:
        !           116: END.f:
        !           117:    end:
        !           118: EXPR.f:
        !           119:    expr:
        !           120: INSTMT.f:
        !           121:    instmt:
        !           122: IN.f:
        !           123:    in:
        !           124: INOPT.f:
        !           125:    inopt:
        !           126: LIST.f:
        !           127:    list:
        !           128: LOOKUP.f:
        !           129:    lookup:
        !           130: MAPCHR.f:
        !           131:    mapchr:
        !           132: PU.f:
        !           133:    pu:
        !           134: COMCHK.f:
        !           135:    comchk:
        !           136: COMPAR.f:
        !           137:    compar:
        !           138: FINDND.f:
        !           139:    findnd:
        !           140: FINDCM.f:
        !           141:    findcm:
        !           142: INREF.f:
        !           143:    inref:
        !           144: INSYM.f:
        !           145:    insym:
        !           146: MATCH.f:
        !           147:    match:
        !           148: MKCOM.f:
        !           149:    mkcom:
        !           150: OUTCOM.f:
        !           151:    outcom:
        !           152: OUTLAT.f:
        !           153:    outlat:
        !           154: OUT2A.f:
        !           155:    out2a:
        !           156: OUT2C.f:
        !           157:    out2c:
        !           158: SCAN.f:
        !           159:    scan:
        !           160: SETARG.f:
        !           161:    setarg:
        !           162: SETASF.f:
        !           163:    setasf:
        !           164: SETCOM.f:
        !           165:    setcom:
        !           166: SETEXT.f:
        !           167:    setext:
        !           168: SETPD.f:
        !           169:    setpd:
        !           170: SETREF.f:
        !           171:    setref:
        !           172: UNSAFE.f:
        !           173:    unsafe:
        !           174: CHECKS.f:
        !           175:    checks:
        !           176: CONSTR.f:
        !           177:    constr:
        !           178: OUT2.f:
        !           179:    out2:
        !           180: SETNOD.f:
        !           181:    setnod:
        !           182: CHK1.f:
        !           183:    chk1:
        !           184: CHK2.f:
        !           185:    chk2:
        !           186: FIND.f:
        !           187:    find:
        !           188: ASLEV.f:
        !           189:    aslev:
        !           190: INVOKE.f:
        !           191:    invoke:
        !           192: RDSYM.f:
        !           193:    rdsym:
        !           194: PROC.f:
        !           195:    proc:
        !           196: CHKALL.f:
        !           197:    chkall:
        !           198: CHK3.f:
        !           199:    chk3:
        !           200: packc.f:
        !           201:    s5pack:
        !           202: unpakc.f:
        !           203:    s5unpk:
        !           204: C XXXXXtt2ARDECL.f
        !           205: ARDECL.f:
        !           206:    ardecl:
        !           207: C XXXXXtt2ASLEV.f
        !           208: ASLEV.f:
        !           209:    aslev:
        !           210: C XXXXXtt2ASSASF.f
        !           211: ASSASF.f:
        !           212:    assasf:
        !           213: C XXXXXtt2ASSIGN.f
        !           214: ASSIGN.f:
        !           215:    assign:
        !           216: C XXXXXtt2BLOCKDATA0.
        !           217: BLOCKDATA0.f:
        !           218:    BLOCK DATA:
        !           219: C XXXXXtt2BLOCKDATA1.
        !           220: BLOCKDATA1.f:
        !           221:    BLOCK DATA:
        !           222: C XXXXXtt2BLOCKDATA2.
        !           223: BLOCKDATA2.f:
        !           224:    BLOCK DATA:
        !           225: C XXXXXtt2BLOCKDATA3.
        !           226: BLOCKDATA3.f:
        !           227:    BLOCK DATA:
        !           228: C XXXXXtt2CALLS.f
        !           229: CALLS.f:
        !           230:    calls:
        !           231: C XXXXXtt2CHECKS.f
        !           232: CHECKS.f:
        !           233:    checks:
        !           234: C XXXXXtt2CHK1.f
        !           235: CHK1.f:
        !           236:    chk1:
        !           237: C XXXXXtt2CHK2.f
        !           238: CHK2.f:
        !           239:    chk2:
        !           240: C XXXXXtt2CHK3.f
        !           241: CHK3.f:
        !           242:    chk3:
        !           243: C XXXXXtt2CHKALL.f
        !           244: CHKALL.f:
        !           245:    chkall:
        !           246: C XXXXXtt2COMCHK.f
        !           247: COMCHK.f:
        !           248:    comchk:
        !           249: C XXXXXtt2COMMON.f
        !           250: COMMON.f:
        !           251:    common:
        !           252: C XXXXXtt2COMPAR.f
        !           253: COMPAR.f:
        !           254:    compar:
        !           255: C XXXXXtt2COMPIL.f
        !           256: COMPIL.f:
        !           257:    compil:
        !           258: C XXXXXtt2CONSTR.f
        !           259: CONSTR.f:
        !           260:    constr:
        !           261: C XXXXXtt2DATA.f
        !           262: DATA.f:
        !           263:    data:
        !           264: C XXXXXtt2DIMENS.f
        !           265: DIMENS.f:
        !           266:    dimens:
        !           267: C XXXXXtt2DOCHK.f
        !           268: DOCHK.f:
        !           269:    dochk:
        !           270: C XXXXXtt2DOSPEC.f
        !           271: DOSPEC.f:
        !           272:    dospec:
        !           273: C XXXXXtt2DOSTMT.f
        !           274: DOSTMT.f:
        !           275:    dostmt:
        !           276: C XXXXXtt2DOVAR.f
        !           277: DOVAR.f:
        !           278:    dovar:
        !           279: C XXXXXtt2END.f
        !           280: END.f:
        !           281:    end:
        !           282: C XXXXXtt2EQUIV.f
        !           283: EQUIV.f:
        !           284:    equiv:
        !           285: C XXXXXtt2ERROR1.f
        !           286: ERROR1.f:
        !           287:    error1:
        !           288: C XXXXXtt2ERROR2.f
        !           289: ERROR2.f:
        !           290:    error2:
        !           291: C XXXXXtt2EXCH.f
        !           292: EXCH.f:
        !           293:    exch:
        !           294: C XXXXXtt2EXPR.f
        !           295: EXPR.f:
        !           296:    expr:
        !           297: C XXXXXtt2EXTERN.f
        !           298: EXTERN.f:
        !           299:    extern:
        !           300: C XXXXXtt2FIND.f
        !           301: FIND.f:
        !           302:    find:
        !           303: C XXXXXtt2FINDCM.f
        !           304: FINDCM.f:
        !           305:    findcm:
        !           306: C XXXXXtt2FINDND.f
        !           307: FINDND.f:
        !           308:    findnd:
        !           309: C XXXXXtt2FIXLAB.f
        !           310: FIXLAB.f:
        !           311:    fixlab:
        !           312: C XXXXXtt2FORMAT.f
        !           313: FORMAT.f:
        !           314:    format:
        !           315: C XXXXXtt2GETTOK.f
        !           316: GETTOK.f:
        !           317:    gettok:
        !           318: C XXXXXtt2GOTO.f
        !           319: GOTO.f:
        !           320:    goto:
        !           321: C XXXXXtt2ID.f
        !           322: ID.f:
        !           323:    id:
        !           324: C XXXXXtt2IDLIST.f
        !           325: IDLIST.f:
        !           326:    idlist:
        !           327: C XXXXXtt2IFS.f
        !           328: IFS.f:
        !           329:    ifs:
        !           330: C XXXXXtt2IGATT1.f
        !           331: IGATT1.f:
        !           332:    igatt1:
        !           333: C XXXXXtt2IGATT2.f
        !           334: IGATT2.f:
        !           335:    igatt2:
        !           336: C XXXXXtt2IN.f
        !           337: IN.f:
        !           338:    in:
        !           339: C XXXXXtt2INOPT.f
        !           340: INOPT.f:
        !           341:    inopt:
        !           342: C XXXXXtt2INREF.f
        !           343: INREF.f:
        !           344:    inref:
        !           345: C XXXXXtt2INSTMT.f
        !           346: INSTMT.f:
        !           347:    instmt:
        !           348: C XXXXXtt2INSYM.f
        !           349: INSYM.f:
        !           350:    insym:
        !           351: C XXXXXtt2INTEXT.f
        !           352: INTEXT.f:
        !           353:    intext:
        !           354: C XXXXXtt2INVOKE.f
        !           355: INVOKE.f:
        !           356:    invoke:
        !           357: C XXXXXtt2IO.f
        !           358: IO.f:
        !           359:    io:
        !           360: C XXXXXtt2LDOVAR.f
        !           361: LDOVAR.f:
        !           362:    ldovar:
        !           363: C XXXXXtt2LIST.f
        !           364: LIST.f:
        !           365:    list:
        !           366: C XXXXXtt2LOOKUP.f
        !           367: LOOKUP.f:
        !           368:    lookup:
        !           369: C XXXXXtt2MAIN0.f
        !           370: MAIN0.f:
        !           371:    MAIN:
        !           372: C XXXXXtt2MAIN1.f
        !           373: MAIN1.f:
        !           374: Error on line 1 of MAIN1.f: illegal continuation card ignored
        !           375: 
        !           376: Error.  No assembly.
        !           377: C XXXXXtt2MAPCHR.f
        !           378: MAPCHR.f:
        !           379:    mapchr:
        !           380: C XXXXXtt2MATCH.f
        !           381: MATCH.f:
        !           382:    match:
        !           383: C XXXXXtt2MKCOM.f
        !           384: MKCOM.f:
        !           385:    mkcom:
        !           386: C XXXXXtt2NEXTOK.f
        !           387: NEXTOK.f:
        !           388:    nextok:
        !           389: C XXXXXtt2OUT2.f
        !           390: OUT2.f:
        !           391:    out2:
        !           392: C XXXXXtt2OUT2A.f
        !           393: OUT2A.f:
        !           394:    out2a:
        !           395: C XXXXXtt2OUT2C.f
        !           396: OUT2C.f:
        !           397:    out2c:
        !           398: C XXXXXtt2OUTCOM.f
        !           399: OUTCOM.f:
        !           400:    outcom:
        !           401: C XXXXXtt2OUTLAT.f
        !           402: OUTLAT.f:
        !           403:    outlat:
        !           404: C XXXXXtt2OUTSYM.f
        !           405: OUTSYM.f:
        !           406:    outsym:
        !           407: C XXXXXtt2OVRLAY.f
        !           408: OVRLAY.f:
        !           409:    ovrlay:
        !           410: C XXXXXtt2POP.f
        !           411: POP.f:
        !           412:    pop:
        !           413: C XXXXXtt2PROC.f
        !           414: PROC.f:
        !           415:    proc:
        !           416: C XXXXXtt2PU.f
        !           417: PU.f:
        !           418:    pu:
        !           419: C XXXXXtt2RDLIST.f
        !           420: RDLIST.f:
        !           421:    rdlist:
        !           422: C XXXXXtt2RDSYM.f
        !           423: RDSYM.f:
        !           424:    rdsym:
        !           425: C XXXXXtt2RFLIST.f
        !           426: RFLIST.f:
        !           427:    rflist:
        !           428: C XXXXXtt2SATT1.f
        !           429: SATT1.f:
        !           430:    satt1:
        !           431: C XXXXXtt2SATT2.f
        !           432: SATT2.f:
        !           433:    satt2:
        !           434: C XXXXXtt2SCAN.f
        !           435: SCAN.f:
        !           436:    scan:
        !           437: C XXXXXtt2SEPAR.f
        !           438: SEPAR.f:
        !           439:    separ:
        !           440: C XXXXXtt2SETARG.f
        !           441: SETARG.f:
        !           442:    setarg:
        !           443: C XXXXXtt2SETASF.f
        !           444: SETASF.f:
        !           445:    setasf:
        !           446: C XXXXXtt2SETCOM.f
        !           447: SETCOM.f:
        !           448:    setcom:
        !           449: C XXXXXtt2SETEXT.f
        !           450: SETEXT.f:
        !           451:    setext:
        !           452: C XXXXXtt2SETNAM.f
        !           453: SETNAM.f:
        !           454:    setnam:
        !           455: C XXXXXtt2SETNOD.f
        !           456: SETNOD.f:
        !           457:    setnod:
        !           458: C XXXXXtt2SETPD.f
        !           459: SETPD.f:
        !           460:    setpd:
        !           461: C XXXXXtt2SETREF.f
        !           462: SETREF.f:
        !           463:    setref:
        !           464: C XXXXXtt2SORT.f
        !           465: SORT.f:
        !           466:    sort:
        !           467: C XXXXXtt2SSORT.f
        !           468: SSORT.f:
        !           469:    ssort:
        !           470: C XXXXXtt2SUBFCN.f
        !           471: SUBFCN.f:
        !           472:    subfcn:
        !           473: C XXXXXtt2SUBS.f
        !           474: SUBS.f:
        !           475:    subs:
        !           476: C XXXXXtt2TOKCOM.f
        !           477: TOKCOM.f:
        !           478:    tokcom:
        !           479: C XXXXXtt2TOKLAB.f
        !           480: TOKLAB.f:
        !           481:    toklab:
        !           482: C XXXXXtt2TOKLOG.f
        !           483: TOKLOG.f:
        !           484:    toklog:
        !           485: C XXXXXtt2TOKLOP.f
        !           486: TOKLOP.f:
        !           487:    toklop:
        !           488: C XXXXXtt2TOKPNO.f
        !           489: TOKPNO.f:
        !           490:    tokpno:
        !           491: C XXXXXtt2TOKRL.f
        !           492: TOKRL.f:
        !           493:    tokrl:
        !           494: C XXXXXtt2TYPE.f
        !           495: TYPE.f:
        !           496:    type:
        !           497: C XXXXXtt2TYPST.f
        !           498: TYPST.f:
        !           499:    typst:
        !           500: C XXXXXtt2TYPST2.f
        !           501: TYPST2.f:
        !           502:    typst2:
        !           503: C XXXXXtt2UNSAFE.f
        !           504: UNSAFE.f:
        !           505:    unsafe:
        !           506: C XXXXXtt2out
        !           507: BLOCKDATA0.f:
        !           508:    BLOCK DATA:
        !           509: BLOCKDATA1.f:
        !           510:    BLOCK DATA:
        !           511: BLOCKDATA2.f:
        !           512:    BLOCK DATA:
        !           513: BLOCKDATA3.f:
        !           514:    BLOCK DATA:
        !           515: MAIN0.f:
        !           516:    MAIN:
        !           517: COMPIL.f:
        !           518:    compil:
        !           519: OVRLAY.f:
        !           520:    ovrlay:
        !           521: SATT1.f:
        !           522:    satt1:
        !           523: IGATT1.f:
        !           524:    igatt1:
        !           525: EXCH.f:
        !           526:    exch:
        !           527: SSORT.f:
        !           528:    ssort:
        !           529: ERROR1.f:
        !           530:    error1:
        !           531: ERROR2.f:
        !           532:    error2:
        !           533: ARDECL.f:
        !           534:    ardecl:
        !           535: ASSASF.f:
        !           536:    assasf:
        !           537: ASSIGN.f:
        !           538:    assign:
        !           539: COMMON.f:
        !           540:    common:
        !           541: DIMENS.f:
        !           542:    dimens:
        !           543: DOCHK.f:
        !           544:    dochk:
        !           545: DOSPEC.f:
        !           546:    dospec:
        !           547: DOVAR.f:
        !           548:    dovar:
        !           549: EQUIV.f:
        !           550:    equiv:
        !           551: EXTERN.f:
        !           552:    extern:
        !           553: FIXLAB.f:
        !           554:    fixlab:
        !           555: FORMAT.f:
        !           556:    format:
        !           557: GETTOK.f:
        !           558:    gettok:
        !           559: GOTO.f:
        !           560:    goto:
        !           561: ID.f:
        !           562:    id:
        !           563: IDLIST.f:
        !           564:    idlist:
        !           565: IFS.f:
        !           566:    ifs:
        !           567: INTEXT.f:
        !           568:    intext:
        !           569: IO.f:
        !           570:    io:
        !           571: LDOVAR.f:
        !           572:    ldovar:
        !           573: NEXTOK.f:
        !           574:    nextok:
        !           575: OUTSYM.f:
        !           576:    outsym:
        !           577: POP.f:
        !           578:    pop:
        !           579: RDLIST.f:
        !           580:    rdlist:
        !           581: RFLIST.f:
        !           582:    rflist:
        !           583: SEPAR.f:
        !           584:    separ:
        !           585: SETNAM.f:
        !           586:    setnam:
        !           587: SORT.f:
        !           588:    sort:
        !           589: SUBS.f:
        !           590:    subs:
        !           591: SUBFCN.f:
        !           592:    subfcn:
        !           593: TOKCOM.f:
        !           594:    tokcom:
        !           595: TOKLAB.f:
        !           596:    toklab:
        !           597: TOKLOG.f:
        !           598:    toklog:
        !           599: TOKLOP.f:
        !           600:    toklop:
        !           601: TOKPNO.f:
        !           602:    tokpno:
        !           603: TOKRL.f:
        !           604:    tokrl:
        !           605: TYPE.f:
        !           606:    type:
        !           607: TYPST.f:
        !           608:    typst:
        !           609: TYPST2.f:
        !           610:    typst2:
        !           611: SATT2.f:
        !           612:    satt2:
        !           613: IGATT2.f:
        !           614:    igatt2:
        !           615: CALLS.f:
        !           616:    calls:
        !           617: DATA.f:
        !           618:    data:
        !           619: DOSTMT.f:
        !           620:    dostmt:
        !           621: END.f:
        !           622:    end:
        !           623: EXPR.f:
        !           624:    expr:
        !           625: INSTMT.f:
        !           626:    instmt:
        !           627: IN.f:
        !           628:    in:
        !           629: INOPT.f:
        !           630:    inopt:
        !           631: LIST.f:
        !           632:    list:
        !           633: LOOKUP.f:
        !           634:    lookup:
        !           635: MAPCHR.f:
        !           636:    mapchr:
        !           637: PU.f:
        !           638:    pu:
        !           639: COMCHK.f:
        !           640:    comchk:
        !           641: COMPAR.f:
        !           642:    compar:
        !           643: FINDND.f:
        !           644:    findnd:
        !           645: FINDCM.f:
        !           646:    findcm:
        !           647: INREF.f:
        !           648:    inref:
        !           649: INSYM.f:
        !           650:    insym:
        !           651: MATCH.f:
        !           652:    match:
        !           653: MKCOM.f:
        !           654:    mkcom:
        !           655: OUTCOM.f:
        !           656:    outcom:
        !           657: OUTLAT.f:
        !           658:    outlat:
        !           659: OUT2A.f:
        !           660:    out2a:
        !           661: OUT2C.f:
        !           662:    out2c:
        !           663: SCAN.f:
        !           664:    scan:
        !           665: SETARG.f:
        !           666:    setarg:
        !           667: SETASF.f:
        !           668:    setasf:
        !           669: SETCOM.f:
        !           670:    setcom:
        !           671: SETEXT.f:
        !           672:    setext:
        !           673: SETPD.f:
        !           674:    setpd:
        !           675: SETREF.f:
        !           676:    setref:
        !           677: UNSAFE.f:
        !           678:    unsafe:
        !           679: CHECKS.f:
        !           680:    checks:
        !           681: CONSTR.f:
        !           682:    constr:
        !           683: OUT2.f:
        !           684:    out2:
        !           685: SETNOD.f:
        !           686:    setnod:
        !           687: CHK1.f:
        !           688:    chk1:
        !           689: CHK2.f:
        !           690:    chk2:
        !           691: FIND.f:
        !           692:    find:
        !           693: ASLEV.f:
        !           694:    aslev:
        !           695: INVOKE.f:
        !           696:    invoke:
        !           697: RDSYM.f:
        !           698:    rdsym:
        !           699: PROC.f:
        !           700:    proc:
        !           701: CHKALL.f:
        !           702:    chkall:
        !           703: CHK3.f:
        !           704:    chk3:
        !           705: packc.f:
        !           706:    s5pack:
        !           707: unpakc.f:
        !           708:    s5unpk:
        !           709: C XXXXXtt2packc.f
        !           710: packc.f:
        !           711:    s5pack:
        !           712: C XXXXXtt2tstpak.f
        !           713: tstpak.f:
        !           714:    MAIN:
        !           715: C XXXXXtt2tt2ASLEV.f
        !           716: tt2ASLEV.f:
        !           717: Error on line 1 of tt2ASLEV.f: illegal continuation card ignored
        !           718: Error on line 2 of tt2ASLEV.f: illegal continuation card ignored
        !           719: 
        !           720: Error.  No assembly.
        !           721: C XXXXXtt2ttASLEV.f
        !           722: ttASLEV.f:
        !           723: Error on line 1 of ttASLEV.f: illegal continuation card ignored
        !           724: Error on line 2 of ttASLEV.f: illegal continuation card ignored
        !           725: Error on line 3 of ttASLEV.f: illegal continuation card ignored
        !           726: Error on line 4 of ttASLEV.f: illegal continuation card ignored
        !           727: Error on line 5 of ttASLEV.f: illegal continuation card ignored
        !           728: Error on line 6 of ttASLEV.f: nondigit in statement number field
        !           729: Error on line 6 of ttASLEV.f: Execution error unclassifiable statement
        !           730: 
        !           731: Error.  No assembly.
        !           732: C XXXXXtt2unpakc.f
        !           733: unpakc.f:
        !           734:    s5unpk:

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.