15     logical :: list = .false.
 
   16     logical :: print_input = .false.
 
   17     logical :: print_flows = .false.
 
   18     logical :: save_flows = .false.
 
   19     logical :: newtonoptions = .false.
 
   20     logical :: newton = .false.
 
   21     logical :: under_relaxation = .false.
 
   22     logical :: ncmesh2drec = .false.
 
   23     logical :: netcdf_mesh2d = .false.
 
   24     logical :: ncstructrec = .false.
 
   25     logical :: netcdf_struct = .false.
 
   26     logical :: fileout = .false.
 
   27     logical :: ncmesh2dfile = .false.
 
   28     logical :: ncstructfile = .false.
 
   29     logical :: nc_filerecord = .false.
 
   30     logical :: netcdf = .false.
 
   31     logical :: filein = .false.
 
   32     logical :: netcdf_fname = .false.
 
   33     logical :: ftype = .false.
 
   34     logical :: fname = .false.
 
   35     logical :: pname = .false.
 
   40   character(len=16), 
parameter :: &
 
   56     'name of listing file', & 
 
   75     'print input to listing file', & 
 
   94     'print calculated flows to listing file', & 
 
  113     'save flows for all packages to budget file', & 
 
  130     'RECORD NEWTON UNDER_RELAXATION', & 
 
  132     'newton keyword and options', & 
 
  151     'keyword to activate Newton-Raphson formulation', & 
 
  166     'UNDER_RELAXATION', & 
 
  167     'UNDER_RELAXATION', & 
 
  170     'keyword to activate Newton-Raphson UNDER_RELAXATION option', & 
 
  185     'NC_MESH2D_FILERECORD', & 
 
  187     'RECORD NETCDF_MESH2D FILEOUT NCMESH2DFILE', & 
 
  223     'NC_STRUCTURED_FILERECORD', & 
 
  225     'RECORD NETCDF_STRUCTURED FILEOUT NCSTRUCTFILE', & 
 
  242     'NETCDF_STRUCTURED', & 
 
  320     'RECORD NETCDF FILEIN NETCDF_FILENAME', & 
 
  379     'netcdf input filename', & 
 
  436     'user name for package', & 
 
  479     'RECARRAY FTYPE FNAME PNAME', & 
 
This module contains simulation constants.
 
integer(i4b), parameter lenvarname
maximum length of a variable name