Changes between Version 15 and Version 16 of ImplementAnalysisGlobal
- Timestamp:
- Nov 24, 2020, 11:16:49 AM (4 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
ImplementAnalysisGlobal
v15 v16 40 40 {{{ 41 41 SUBROUTINE PDAFomi_assimilate_global(U_collect_state, U_distribute_state, & 42 U_init_dim_obs , U_obs_op, U_init_obs, &42 U_init_dim_obs_pdafomi, U_obs_op_pdafomi, & 43 43 U_prepoststep, U_next_observation, status) 44 44 }}} … … 46 46 * [#U_collect_statecollect_state_pdaf.F90 U_collect_state]: The name of the user-supplied routine that initializes a state vector from the array holding the ensemble of model states from the model fields. This is basically the inverse operation to `U_distribute_state` used in `PDAF_get_state` as well as here. 47 47 * [#U_distribute_statedistribute_state_pdaf.F90 U_distribute_state]: The name of a user supplied routine that initializes the model fields from the array holding the ensemble of model state vectors. 48 * [#U_init_dim_obs callback_obs_pdafomi.F90 U_init_dim_obs]: The name of the user-supplied routine that initializes the observation information and provides the size of observation vector49 * [#U_obs_op callback_obs_pdafomi.F90 U_obs_op]: The name of the user-supplied routine that acts as the observation operator on some state vector48 * [#U_init_dim_obs_pdafomicallback_obs_pdafomi.F90 U_init_dim_obs_pdafomi]: The name of the user-supplied routine that initializes the observation information and provides the size of observation vector 49 * [#U_obs_op_pdafomicallback_obs_pdafomi.F90 U_obs_op_pdafomi]: The name of the user-supplied routine that acts as the observation operator on some state vector 50 50 * [#U_prepoststepprepoststep_ens_pdaf.F90 U_prepoststep]: The name of the pre/poststep routine as in `PDAF_get_state` 51 51 * [#U_next_observationnext_observation.F90 U_next_observation]: The name of a user supplied routine that initializes the variables `nsteps`, `timenow`, and `doexit`. The same routine is also used in `PDAF_get_state`. … … 60 60 {{{ 61 61 SUBROUTINE PDAFomi_put_state_global(U_collect_state, & 62 U_init_dim_obs, U_obs_op, U_init_obs,&62 U_init_dim_obs, U_obs_op, & 63 63 U_prepoststep, status) 64 64 }}} … … 76 76 77 77 This routine is independent of the filter algorithm used. 78 78 79 See the page on [InsertAnalysisStep#U_collect_statecollect_state_pdaf.F90 inserting the analysis step] for the description of this routine. 79 80 … … 82 83 83 84 This routine is independent of the filter algorithm used. 85 84 86 See the page on [InsertAnalysisStep#U_distribute_statedistribute_state_pdaf.F90 inserting the analysis step] for the description of this routine. 85 87 86 88 87 === `U_init_dim_obs ` (callback_obs_pdafomi.F90) ===89 === `U_init_dim_obs_pdafomi` (callback_obs_pdafomi.F90) === 88 90 89 This is a call-back routine for PDAF-OMI. The routine just calls a routine from the observation module for each observation type. 91 This is a call-back routine for PDAF-OMI initializing the observation information. The routine just calls a routine from the observation module for each observation type. 92 90 93 See the [wiki:OMI_Callback_obs_pdafomi documentation on callback_obs_pdafomi.F90] for more information. 91 94 92 95 93 96 94 === `U_obs_op ` (callback_obs_pdafomi.F90) ===97 === `U_obs_op_pdafomi` (callback_obs_pdafomi.F90) === 95 98 96 The interface for this routine is: 97 {{{ 98 SUBROUTINE obs_op_pdafomi(step, dim_p, dim_obs_p, state_p, m_state_p) 99 This is a call-back routine for PDAF-OMI applying the observation operator to the state vector. The routine calls a routine from the observation module for each observation type. 99 100 100 INTEGER, INTENT(in) :: step ! Currrent time step 101 INTEGER, INTENT(in) :: dim_p ! PE-local dimension of state 102 INTEGER, INTENT(in) :: dim_obs_p ! Dimension of observed state 103 REAL, INTENT(in) :: state_p(dim_p) ! PE-local model state 104 REAL, INTENT(out) :: m_state_p(dim_obs_p) ! PE-local observed state 105 }}} 106 107 The routine is called during the analysis step. It has to perform the operation of the observation operator acting on a state vector that is provided as `state_p`. The observed state has to be returned in `m_state_p`. 108 109 For a model using domain decomposition, the operation is on the PE-local sub-domain of the model and has to provide the observed sub-state for the PE-local domain. 110 111 With PDAF-OMI, the routine just calls a routine from the observation module for each observation type. 101 See the [wiki:OMI_Callback_obs_pdafomi documentation on callback_obs_pdafomi.F90] for more information. 112 102 113 103 114 104 === `U_prepoststep` (prepoststep_ens_pdaf.F90) === 115 105 116 The routine has already been described on the [ModifyModelforEnsembleIntegration#U_prepoststepprepoststep_ens_pdaf.F90 page on modifying the model code for the ensemble integration]. For completeness, the description is repeated:106 The routine has already been described for modifying the model for the ensemble integration and for inserting the analysis step. 117 107 118 The interface of the routine is identical for all filters. However, the particular operations that are performed in the routine can be specific for each filter algorithm. 119 120 The interface for this routine is 121 {{{ 122 SUBROUTINE prepoststep(step, dim_p, dim_ens, dim_ens_p, dim_obs_p, & 123 state_p, Uinv, ens_p, flag) 124 125 INTEGER, INTENT(in) :: step ! Current time step 126 ! (When the routine is called before the analysis -step is provided.) 127 INTEGER, INTENT(in) :: dim_p ! PE-local state dimension 128 INTEGER, INTENT(in) :: dim_ens ! Size of state ensemble 129 INTEGER, INTENT(in) :: dim_ens_p ! PE-local size of ensemble 130 INTEGER, INTENT(in) :: dim_obs_p ! PE-local dimension of observation vector 131 REAL, INTENT(inout) :: state_p(dim_p) ! PE-local forecast/analysis state 132 ! The array 'state_p' is not generally not initialized in the case of SEIK/EnKF/ETKF/ESTKF. 133 ! It can be used freely in this routine. 134 REAL, INTENT(inout) :: Uinv(dim_ens-1, dim_ens-1) ! Inverse of matrix U 135 REAL, INTENT(inout) :: ens_p(dim_p, dim_ens) ! PE-local state ensemble 136 INTEGER, INTENT(in) :: flag ! PDAF status flag 137 }}} 138 139 The routine `U_prepoststep` is called once at the beginning of the assimilation process. In addition, it is called during the assimilation cycles before the analysis step and after the ensemble transformation. The routine is called by all filter processes (that is `filterpe=1`). 140 141 The routine provides for the user the full access to the ensemble of model states. Thus, user-controlled pre- and post-step operations can be performed. For example the forecast and the analysis states and ensemble covariance matrix can be analyzed, e.g. by computing the estimated variances. In addition, the estimates can be written to disk. 142 143 Hint: 144 * If a user considers to perform adjustments to the estimates (e.g. for balances), this routine is the right place for it. 145 * Only for the SEEK filter the state vector (`state_p`) is initialized. For all other filters, the array is allocated, but it can be used freely during the execution of `U_prepoststep`. 146 * The interface has a difference for ETKF and ESTKF: For the ETKF, the array `Uinv` has size `dim_ens` x `dim_ens`. In contrast it has size `dim_ens-1` x `dim_ens-1` for the ESTKF. (For most cases, this will be irrelevant, because most usually the ensemble array `ens_p` is used for computations, rather than `Uinv`. Only for the SEIK filter with fixed covariance matrix, `Uinv` is required to compute the estimate analysis error. The fixed covariance matrix mode is not available for the ETKF or ESTKF.) 147 * The interface through which `U_prepoststep` is called does not include the array of smoothed ensembles. In order to access the smoother ensemble array one has to set a pointer to it using a call to the routine `PDAF_get_smootherens` (see page on [AuxiliaryRoutines auxiliary routines]) 108 See the page on [InsertAnalysisStep#U_prepoststepprepoststep_ens_pdaf.F90 inserting the analysis step] for the description of this routine. 148 109 149 110 … … 151 112 152 113 This routine is independent of the filter algorithm used. 114 153 115 See the page on [InsertAnalysisStep#U_next_observationnext_observation_pdaf.F90 inserting the analysis step] for the description of this routine. 154 116 … … 156 118 == Execution order of user-supplied routines == 157 119 158 The user-supplied routines are essentially executed in the order they are listed in the interface to `PDAFomi_assimilate_global`. The order can be important as some routines can perform preparatory work for later routines. For example, `U_init_dim_obs ` prepares an index array that provides the information for executing the observation operator in `U_obs_op`. How this information is initialized is described in the documentation of OMI.120 The user-supplied routines are essentially executed in the order they are listed in the interface to `PDAFomi_assimilate_global`. The order can be important as some routines can perform preparatory work for later routines. For example, `U_init_dim_obs_pdafomi` prepares an index array that provides the information for executing the observation operator in `U_obs_op_pdafomi`. How this information is initialized is described in the documentation of OMI. 159 121 160 122 Before the analysis step is called the following routine is executed: … … 163 125 The analysis step is executed when the ensemble integration of the forecast is completed. During the analysis step the following routines are executed in the given order: 164 126 1. [#U_prepoststepprepoststep_ens_pdaf.F90 U_prepoststep] (Call to act on the forecast ensemble, called with negative value of the time step) 165 1. [#U_init_dim_obsinit_dim_obs_pdaf.F90 U_init_dim_obs] 166 1. [#U_obs_opobs_op_pdaf.F90 U_obs_op] (multiple calls, one for each ensemble member) 167 1. [#U_prodRinvAprodrinva_pdaf.F90 U_prodRinvA] 127 1. [#U_init_dim_obs_pdafomicallback_obs_pdafomi.F90 U_init_dim_obs_pdafomi] 128 1. [#U_obs_op_pdafomicallback_obs_pdafomi.F90 U_obs_op_pdafomi] (multiple calls, one for each ensemble member) 168 129 1. [#U_prepoststepprepoststep_ens_pdaf.F90 U_prepoststep] (Call to act on the analysis ensemble, called with (positive) value of the time step) 169 130