Title: Subset FORTRAN-77