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