| | 1 | = PDAFomi_gather_obs = |
| | 2 | |
| | 3 | This page documents the routine `PDAFomi_gather_obs of PDAF-OMI. |
| | 4 | |
| | 5 | The routine ha to be called in `init_dim_obs_OBTYPE` in each observation module. It initializes the observation information for PDAF-OMI. |
| | 6 | |
| | 7 | || See the [wiki:OMI_observation_modules page describing PDAF-OMI observation modules] for the full documentation of the modules.|| |
| | 8 | |
| | 9 | The interface is: |
| | 10 | {{{ |
| | 11 | SUBROUTINE PDAFomi_gather_obs(thisobs, dim_obs_p, obs_p, ivar_obs_p, ocoord_p, & |
| | 12 | ncoord, lradius, dim_obs) |
| | 13 | |
| | 14 | TYPE(obs_f), INTENT(inout) :: thisobs ! Data type with full observation information |
| | 15 | INTEGER, INTENT(in) :: dim_obs_p ! Number of process-local observations |
| | 16 | REAL, INTENT(in) :: obs_p(:) ! Vector of process-local observations |
| | 17 | REAL, INTENT(in) :: ivar_obs_p(:) ! Vector of process-local inverse observation error variance |
| | 18 | REAL, INTENT(in) :: ocoord_p(:,:) ! Array of process-local observation coordinates |
| | 19 | INTEGER, INTENT(in) :: ncoord ! Number of rows (first index) of coordinate array |
| | 20 | REAL, INTENT(in) :: lradius ! Typical localization radius (the maximum radius used in this process domain) |
| | 21 | INTEGER, INTENT(out) :: dim_obs ! Full number of observations |
| | 22 | |
| | 23 | }}} |
| | 24 | |
| | 25 | '''Notes:''' |
| | 26 | * The only direect output is `dim_obs`, which is then returned to `init_dim_obs_pdafomi` in `callback_obs_pdafomi.F90`. |
| | 27 | * The value of `lradius` can be some maximum value. It is only utilized if domain-limited observations are activated ([wiki:OMI_use_global_obs see page on using the option `use_global_obs`]) |