MODULE SubLst_Module
   USE Prntng_Module
   USE SubList_Module
   IMPLICIT NONE
   SAVE
   NAMELIST/debug/ option, iprtall, nsubs, subs, iprt, iter
END MODULE SubLst_Module