| 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`]) |