MODFLOW 6  version 6.7.0.dev0
USGS Modular Hydrologic Model
simstagesmodule Module Reference

Functions/Subroutines

character(len=24) function, public stg_to_str (stage)
 Converts a stage to its string representation. More...
 

Variables

integer(i4b), parameter, public stg_never = 0
 never More...
 
integer(i4b), parameter, public stg_bfr_mdl_df = 1
 before model define More...
 
integer(i4b), parameter, public stg_aft_mdl_df = 2
 after model define More...
 
integer(i4b), parameter, public stg_aft_exg_df = 3
 after exchange define More...
 
integer(i4b), parameter, public stg_aft_con_cr = 4
 after connection create More...
 
integer(i4b), parameter, public stg_bfr_con_df = 5
 before connection define More...
 
integer(i4b), parameter, public stg_aft_con_df = 6
 after connection define More...
 
integer(i4b), parameter, public stg_bfr_exg_ac = 7
 before exchange add connections (per solution) More...
 
integer(i4b), parameter, public stg_bfr_con_ar = 8
 before connection allocate read More...
 
integer(i4b), parameter, public stg_aft_con_ar = 9
 afterr connection allocate read More...
 
integer(i4b), parameter, public stg_bfr_exg_rp = 10
 before exchange read prepare More...
 
integer(i4b), parameter, public stg_aft_con_rp = 11
 after connection read prepare More...
 
integer(i4b), parameter, public stg_bfr_exg_ad = 12
 before exchange advance (per solution) More...
 
integer(i4b), parameter, public stg_bfr_exg_cf = 13
 before exchange calculate (per solution) More...
 
integer(i4b), parameter, public stg_bfr_exg_fc = 14
 before exchange formulate (per solution) More...
 
integer(i4b), parameter, public nr_sim_stages = 14
 before exchange formulate (per solution) More...
 

Function/Subroutine Documentation

◆ stg_to_str()

character(len=24) function, public simstagesmodule::stg_to_str ( integer(i4b)  stage)

Definition at line 30 of file SimStages.f90.

31  integer(I4B) :: stage
32  character(len=24) :: stg_str
33 
34  if (stage == stg_never) then; stg_str = "STG_NEVER"
35  else if (stage == stg_bfr_mdl_df) then; stg_str = "STG_BFR_MDL_DF"
36  else if (stage == stg_aft_mdl_df) then; stg_str = "STG_AFT_MDL_DF"
37  else if (stage == stg_aft_exg_df) then; stg_str = "STG_AFT_EXG_DF"
38  else if (stage == stg_aft_con_cr) then; stg_str = "STG_AFT_CON_CR"
39  else if (stage == stg_bfr_con_df) then; stg_str = "STG_BFR_CON_DF"
40  else if (stage == stg_aft_con_df) then; stg_str = "STG_AFT_CON_DF"
41  else if (stage == stg_bfr_exg_ac) then; stg_str = "STG_BFR_EXG_AC"
42  else if (stage == stg_bfr_con_ar) then; stg_str = "STG_BFR_CON_AR"
43  else if (stage == stg_aft_con_ar) then; stg_str = "STG_AFT_CON_AR"
44  else if (stage == stg_bfr_exg_rp) then; stg_str = "STG_BFR_EXG_RP"
45  else if (stage == stg_aft_con_rp) then; stg_str = "STG_AFT_CON_RP"
46  else if (stage == stg_bfr_exg_ad) then; stg_str = "STG_BFR_EXG_AD"
47  else if (stage == stg_bfr_exg_cf) then; stg_str = "STG_BFR_EXG_CF"
48  else if (stage == stg_bfr_exg_fc) then; stg_str = "STG_BFR_EXG_FC"
49  else; stg_str = "UNKNOWN"
50  end if
51 
Here is the caller graph for this function:

Variable Documentation

◆ nr_sim_stages

integer(i4b), parameter, public simstagesmodule::nr_sim_stages = 14

Definition at line 24 of file SimStages.f90.

24  integer(I4B), public, parameter :: NR_SIM_STAGES = 14 !< before exchange formulate (per solution)

◆ stg_aft_con_ar

integer(i4b), parameter, public simstagesmodule::stg_aft_con_ar = 9

Definition at line 18 of file SimStages.f90.

18  integer(I4B), public, parameter :: STG_AFT_CON_AR = 9 !< afterr connection allocate read

◆ stg_aft_con_cr

integer(i4b), parameter, public simstagesmodule::stg_aft_con_cr = 4

Definition at line 13 of file SimStages.f90.

13  integer(I4B), public, parameter :: STG_AFT_CON_CR = 4 !< after connection create

◆ stg_aft_con_df

integer(i4b), parameter, public simstagesmodule::stg_aft_con_df = 6

Definition at line 15 of file SimStages.f90.

15  integer(I4B), public, parameter :: STG_AFT_CON_DF = 6 !< after connection define

◆ stg_aft_con_rp

integer(i4b), parameter, public simstagesmodule::stg_aft_con_rp = 11

Definition at line 20 of file SimStages.f90.

20  integer(I4B), public, parameter :: STG_AFT_CON_RP = 11 !< after connection read prepare

◆ stg_aft_exg_df

integer(i4b), parameter, public simstagesmodule::stg_aft_exg_df = 3

Definition at line 12 of file SimStages.f90.

12  integer(I4B), public, parameter :: STG_AFT_EXG_DF = 3 !< after exchange define

◆ stg_aft_mdl_df

integer(i4b), parameter, public simstagesmodule::stg_aft_mdl_df = 2

Definition at line 11 of file SimStages.f90.

11  integer(I4B), public, parameter :: STG_AFT_MDL_DF = 2 !< after model define

◆ stg_bfr_con_ar

integer(i4b), parameter, public simstagesmodule::stg_bfr_con_ar = 8

Definition at line 17 of file SimStages.f90.

17  integer(I4B), public, parameter :: STG_BFR_CON_AR = 8 !< before connection allocate read

◆ stg_bfr_con_df

integer(i4b), parameter, public simstagesmodule::stg_bfr_con_df = 5

Definition at line 14 of file SimStages.f90.

14  integer(I4B), public, parameter :: STG_BFR_CON_DF = 5 !< before connection define

◆ stg_bfr_exg_ac

integer(i4b), parameter, public simstagesmodule::stg_bfr_exg_ac = 7

Definition at line 16 of file SimStages.f90.

16  integer(I4B), public, parameter :: STG_BFR_EXG_AC = 7 !< before exchange add connections (per solution)

◆ stg_bfr_exg_ad

integer(i4b), parameter, public simstagesmodule::stg_bfr_exg_ad = 12

Definition at line 21 of file SimStages.f90.

21  integer(I4B), public, parameter :: STG_BFR_EXG_AD = 12 !< before exchange advance (per solution)

◆ stg_bfr_exg_cf

integer(i4b), parameter, public simstagesmodule::stg_bfr_exg_cf = 13

Definition at line 22 of file SimStages.f90.

22  integer(I4B), public, parameter :: STG_BFR_EXG_CF = 13 !< before exchange calculate (per solution)

◆ stg_bfr_exg_fc

integer(i4b), parameter, public simstagesmodule::stg_bfr_exg_fc = 14

Definition at line 23 of file SimStages.f90.

23  integer(I4B), public, parameter :: STG_BFR_EXG_FC = 14 !< before exchange formulate (per solution)

◆ stg_bfr_exg_rp

integer(i4b), parameter, public simstagesmodule::stg_bfr_exg_rp = 10

Definition at line 19 of file SimStages.f90.

19  integer(I4B), public, parameter :: STG_BFR_EXG_RP = 10 !< before exchange read prepare

◆ stg_bfr_mdl_df

integer(i4b), parameter, public simstagesmodule::stg_bfr_mdl_df = 1

Definition at line 10 of file SimStages.f90.

10  integer(I4B), public, parameter :: STG_BFR_MDL_DF = 1 !< before model define

◆ stg_never

integer(i4b), parameter, public simstagesmodule::stg_never = 0

Definition at line 9 of file SimStages.f90.

9  integer(I4B), public, parameter :: STG_NEVER = 0 !< never