LINK obj200d_Xcontrld7by obj200d_Xgen31y obj200d_FALLOC3ay obj200d_FANAL4ay obj200d_FARITH1y obj200d_FCINNUM2ay obj200d_FCODE3y obj200d_Fdata3y obj200d_FEND4y obj200d_Fgen3y obj200d_FINPUT3ay obj200d_FMAP1y obj200d_FMESS2y obj200d_f1opt1y obj200d_f2opt1y obj200d_f3opt3y obj200d_f4opt1ay obj200d_f5opt1y obj200d_fcelim1y obj200d_feelim1y obj200d_foplist1y obj200d_foptctl2y obj200d_fsred1y obj200d_FREAL1by obj200d_Froot1jy obj200d_FTRIADS1y obj200d_FFPTOS1ay obj200d_FCFMT1ay .END newcompd MODIFY newcompd redirect Einitialise,E#INITIALISE Eterminate,E#TERMINATE Ecommon,E#COMMON Eendcommon,E#ENDCOMMON Elinestart,E#LINESTART Emonon,E#MOMON Efaulty,E#FAULTY Estklit,E#STKLIT Estkconst,E#STKCONST Estkrconst,E#STKRCONST Estkdir,E#STKDIR Estkind,E#STKIND Estkpar,E#STKPAR Estkparind,E#STKPARIND Estkresult,E#STKRESULT Erefer,E#REFER Epromote,E#PROMOTE Edemote,E#DEMOTE Estkaddr,E#STKADDR Elabel,E#LABEL Euchecklab,E#UCHECKLAB Eboundlab,E#BOUNDLAB Ejump,E#JUMP Etwjump,E#TWJUMP Eswitch,E#SWITCH EfswitchJump,E#FSWITCHJUMP EswitchLabel,E#SWITCHLABEL Ed1,E#D1 Ed2,E#D2 Ed4,E#D4 Edbytes,E#DBYTES Edpattern,E#DPATTERN Efix,E#FIX EXname,E#XNAME Eprecall,E#PRECALL Ecall,E#CALL Eproc,E#PROC Eprocend,E#PROCEND Eentry,E#ENTRY Eop,E#OP Ef77op,E#F77OP .end SATISFY REFS .ALL SUPPRESS .ALL RETAIN ICL9CEIBMF77 satisfy data .all suppress data .all CLOSE newgen newcompd,f77opt215d