16 logical :: list = .false.
17 logical :: print_input = .false.
18 logical :: print_flows = .false.
19 logical :: save_flows = .false.
20 logical :: newtonoptions = .false.
21 logical :: newton = .false.
22 logical :: under_relaxation = .false.
23 logical :: ftype = .false.
24 logical :: fname = .false.
25 logical :: pname = .false.
31 character(len=16),
parameter :: &
47 'name of listing file', &
66 'print input to listing file', &
85 'print calculated flows to listing file', &
104 'save flows for all packages to budget file', &
121 'RECORD NEWTON UNDER_RELAXATION', &
123 'newton keyword and options', &
142 'keyword to activate Newton-Raphson formulation', &
157 'UNDER_RELAXATION', &
158 'UNDER_RELAXATION', &
161 'keyword to activate Newton-Raphson UNDER_RELAXATION option', &
218 'user name for package', &
250 'RECARRAY FTYPE FNAME PNAME', &
This module contains simulation constants.
integer(i4b), parameter lenvarname
maximum length of a variable name