9 integer(I4B),
public,
parameter ::
stg_never = 0
32 character(len=24) :: stg_str
34 if (stage ==
stg_never) then; stg_str =
"STG_NEVER"
49 else; stg_str =
"UNKNOWN"
This module defines variable data types.
integer(i4b), parameter, public stg_aft_con_ar
afterr connection allocate read
integer(i4b), parameter, public stg_aft_con_df
after connection define
integer(i4b), parameter, public nr_sim_stages
before exchange formulate (per solution)
integer(i4b), parameter, public stg_aft_mdl_df
after model define
integer(i4b), parameter, public stg_bfr_mdl_df
before model define
integer(i4b), parameter, public stg_aft_exg_df
after exchange define
integer(i4b), parameter, public stg_bfr_exg_ad
before exchange advance (per solution)
integer(i4b), parameter, public stg_bfr_exg_cf
before exchange calculate (per solution)
integer(i4b), parameter, public stg_never
never
character(len=24) function, public stg_to_str(stage)
Converts a stage to its string representation.
integer(i4b), parameter, public stg_aft_con_cr
after connection create
integer(i4b), parameter, public stg_bfr_exg_fc
before exchange formulate (per solution)
integer(i4b), parameter, public stg_bfr_exg_rp
before exchange read prepare
integer(i4b), parameter, public stg_bfr_exg_ac
before exchange add connections (per solution)
integer(i4b), parameter, public stg_bfr_con_ar
before connection allocate read
integer(i4b), parameter, public stg_aft_con_rp
after connection read prepare
integer(i4b), parameter, public stg_bfr_con_df
before connection define