Changes between Version 1 and Version 2 of U_obs_op_adj
- Timestamp:
- Mar 7, 2025, 1:20:10 PM (7 days ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
U_obs_op_adj
v1 v2 9 9 The interface is the following: 10 10 {{{ 11 SUBROUTINE U_obs_op_adj(step, dim_p, dim_obs_p, state_p, m_state_p)11 SUBROUTINE U_obs_op_adj(step, dim_p, dim_obs_p, m_state_p, state_p) 12 12 13 13 INTEGER, INTENT(in) :: step ! Current time step 14 14 INTEGER, INTENT(in) :: dim_p ! PE-local dimension of state 15 15 INTEGER, INTENT(in) :: dim_obs_p ! Dimension of observed state 16 REAL, INTENT(in) :: m_state_p(dim_obs_p) ! PE-local observedstate17 REAL, INTENT(out) :: state_p(dim_p) ! PE-local modelstate16 REAL, INTENT(in) :: state_p(dim_p) ! PE-local model state 17 REAL, INTENT(out) :: m_state_p(dim_obs_p) ! PE-local observed state 18 18 }}} 19 19