mom_document::doc_type integer integer mom_document::doc_type::unitall unitall = -1 The open unit number for docFileBase + .all. integer integer mom_document::doc_type::unitshort unitshort = -1 The open unit number for docFileBase + .short. integer integer mom_document::doc_type::unitlayout unitlayout = -1 The open unit number for docFileBase + .layout. integer integer mom_document::doc_type::unitdebugging unitdebugging = -1 The open unit number for docFileBase + .debugging. logical logical mom_document::doc_type::filesareopen filesareopen = .false. True if any files were successfully opened. character(len=mlen) character(len=mlen) mom_document::doc_type::docfilebase docfilebase = '' The basename of the files where run-time parameters, settings and defaults are documented. logical logical mom_document::doc_type::complete complete = .true. If true, document all parameters. logical logical mom_document::doc_type::minimal minimal = .true. If true, document non-default parameters. logical logical mom_document::doc_type::layout layout = .true. If true, document layout parameters. logical logical mom_document::doc_type::debugging debugging = .true. If true, document debugging parameters. logical logical mom_document::doc_type::definesyntax definesyntax = .false. If true, use '#def' syntax instead of a=b syntax. logical logical mom_document::doc_type::warnonconflicts warnonconflicts = .false. Cause a WARNING error if defaults differ. integer integer mom_document::doc_type::commentcolumn commentcolumn = 32 Number of spaces before the comment marker. integer integer mom_document::doc_type::max_line_len max_line_len = 112 The maximum length of message lines. type(link_msg), pointer type(link_msg), pointer mom_document::doc_type::chain_msg chain_msg => NULL() Database of messages. character(len=240) character(len=240) mom_document::doc_type::blockprefix blockprefix = '' The full name of the current block. A structure that controls where the documentation occurs, its veborsity and formatting. character(len=620) logical character(len=80) character(len=mlen) integer character(len=240) mom_document::doc_type blockprefix complete filesareopen minimal warnonconflicts layout definesyntax debugging chain_msg docfilebase max_line_len unitdebugging unitshort commentcolumn unitall unitlayout mom_document::link_msg next msg name mom_document::doc_typeblockprefix mom_document::doc_typechain_msg mom_document::doc_typecommentcolumn mom_document::doc_typecomplete mom_document::doc_typedebugging mom_document::doc_typedefinesyntax mom_document::doc_typedocfilebase mom_document::doc_typefilesareopen mom_document::doc_typelayout mom_document::doc_typemax_line_len mom_document::doc_typeminimal mom_document::doc_typeunitall mom_document::doc_typeunitdebugging mom_document::doc_typeunitlayout mom_document::doc_typeunitshort mom_document::doc_typewarnonconflicts