LINK
obj200_XCONTRl5by
obj200d_XGEN27dy
obj200_FALLOC2ay
obj200_FANAL2ay
obj200_FARITH1y
obj200_FCINNUM2ay
obj200_fcode3y
obj200_FDATA2y
obj200_FEND3y
obj200_FGEN3y
obj200_FINPUT3ay
obj200_FMAP1y
obj200_FMESS2y
obj200_FOPTDUM1y
obj200_FREAL1by
obj200_Froot1ey
obj200_FTRIADS1y
obj200_FFPTOS1ay
obj200_FCFMT1ay
.END
NEWFORT
MODIFY NEWFORT
SATISFY REFS
.ALL
SUPPRESS
.ALL
RETAIN
ICL9CEIBMF77
CLOSE
rename newfort,:f77c208