15 logical :: auxiliary = .false.
16 logical :: auxmultname = .false.
17 logical :: boundnames = .false.
18 logical :: print_input = .false.
19 logical :: print_flows = .false.
20 logical :: save_flows = .false.
21 logical :: ts_filerecord = .false.
22 logical :: ts6 = .false.
23 logical :: filein = .false.
24 logical :: ts6_filename = .false.
25 logical :: obs_filerecord = .false.
26 logical :: obs6 = .false.
27 logical :: obs6_filename = .false.
28 logical :: maxbound = .false.
29 logical :: cellid = .false.
30 logical :: head = .false.
31 logical :: aux = .false.
32 logical :: boundname = .false.
37 character(len=16),
parameter :: &
53 'keyword to specify aux variables', &
71 'name of auxiliary variable for multiplier', &
107 'print input to listing file', &
125 'print CHD flows to listing file', &
143 'save CHD flows to budget file', &
159 'RECORD TS6 FILEIN TS6_FILENAME', &
215 'file name of time series information', &
231 'RECORD OBS6 FILEIN OBS6_FILENAME', &
269 'obs6 input filename', &
287 'maximum number of constant heads', &
323 'head value assigned to constant head', &
341 'auxiliary variables', &
359 'constant head boundary name', &
396 'STRESS_PERIOD_DATA', &
398 'RECARRAY CELLID HEAD AUX BOUNDNAME', &
This module contains simulation constants.
integer(i4b), parameter lenvarname
maximum length of a variable name