MODULE SubList_Module IMPLICIT NONE SAVE CHARACTER(LEN=21) subs(200) ! List of SUBROUTINE names with debugging options turned on. END MODULE SubList_Module