15 logical :: boundnames = .false.
16 logical :: iprpak = .false.
17 logical :: iprflow = .false.
18 logical :: ipakcb = .false.
19 logical :: obs_filerecord = .false.
20 logical :: obs6 = .false.
21 logical :: filein = .false.
22 logical :: obs6_filename = .false.
23 logical :: mover = .false.
24 logical :: maxbound = .false.
29 character(len=16),
parameter :: &
63 'print input to listing file', &
81 'print calculated flows to listing file', &
99 'save api flows to budget file', &
115 'RECORD OBS6 FILEIN OBS6_FILENAME', &
171 'obs6 input filename', &
207 'maximum number of user-defined api boundaries', &
This module contains simulation constants.
integer(i4b), parameter lenvarname
maximum length of a variable name