$ frd4 :== FORTRAN/F77/NOCHECK/list/mach
$ frd4 'p1			! Do it the first time