16 logical :: flow_pkg_name = .false.
17 logical :: auxiliary = .false.
18 logical :: fp_aux_name = .false.
19 logical :: boundnames = .false.
20 logical :: iprpak = .false.
21 logical :: iprconc = .false.
22 logical :: iprflow = .false.
23 logical :: ipakcb = .false.
24 logical :: conc_filerec = .false.
25 logical :: options_concentration = .false.
26 logical :: concfile = .false.
27 logical :: budfilerec = .false.
28 logical :: budget = .false.
29 logical :: fileout = .false.
30 logical :: budgetfile = .false.
31 logical :: budcsvfilerec = .false.
32 logical :: budgetcsv = .false.
33 logical :: budgetcsvfile = .false.
34 logical :: ts_filerecord = .false.
35 logical :: ts6 = .false.
36 logical :: filein = .false.
37 logical :: ts6_filename = .false.
38 logical :: obs_filerecord = .false.
39 logical :: obs6 = .false.
40 logical :: obs6_filename = .false.
41 logical :: dev_nonexpanding = .false.
42 logical :: packagedata_ifno = .false.
43 logical :: strt = .false.
44 logical :: aux = .false.
45 logical :: boundname = .false.
46 logical :: ifno = .false.
47 logical :: status = .false.
48 logical :: concentration = .false.
49 logical :: infiltration = .false.
50 logical :: uzet = .false.
51 logical :: auxiliaryrecord = .false.
52 logical :: period_auxiliary = .false.
53 logical :: auxname = .false.
54 logical :: auxval = .false.
60 character(len=16),
parameter :: &
72 'FLOW_PACKAGE_NAME', &
76 'keyword to specify name of corresponding flow package', &
95 'keyword to specify aux variables', &
110 'FLOW_PACKAGE_AUXILIARY_NAME', &
114 'keyword to specify name of concentration auxiliary variable '// &
153 'print input to listing file', &
168 'PRINT_CONCENTRATION', &
172 'print calculated concentrations to listing file', &
191 'print calculated flows to listing file', &
210 'save UZT cell flows to budget file', &
225 'CONCENTRATION_FILERECORD', &
227 'RECORD CONCENTRATION FILEOUT CONCFILE', &
282 'BUDGET_FILERECORD', &
284 'RECORD BUDGET FILEOUT BUDGETFILE', &
358 'BUDGETCSV_FILERECORD', &
360 'RECORD BUDGETCSV FILEOUT BUDGETCSVFILE', &
417 'RECORD TS6 FILEIN TS6_FILENAME', &
476 'file name of time series information', &
493 'RECORD OBS6 FILEIN OBS6_FILENAME', &
533 'obs6 input filename', &
548 'DEV_NONEXPANDING_MATRIX', &
549 'DEV_NONEXPANDING', &
552 'do not add rows to the solution matrix', &
568 'PACKAGEDATA_IFNO', &
571 'UZF cell number for this entry', &
590 'starting UZF cell concentration', &
609 'auxiliary variables', &
647 'unsaturated zone flow cell number for this entry', &
666 'unsaturated zone flow cell concentration status', &
685 'unsaturated zone flow cell concentration', &
704 'infiltration concentration', &
723 'unsaturated zone et concentration', &
740 'RECORD AUXILIARY AUXNAME AUXVAL', &
758 'PERIOD_AUXILIARY', &
799 'auxiliary variable value', &
860 'RECARRAY IFNO STRT AUX BOUNDNAME', &
879 'RECARRAY IFNO UZTSETTING', &
898 'KEYSTRING STATUS CONCENTRATION INFILTRATION UZET '// &
This module contains simulation constants.
integer(i4b), parameter lenvarname
maximum length of a variable name