13 | | TYPE(obs_f), INTENT(inout) :: thisobs ! Observation type |
14 | | INTEGER, INTENT(in) :: nobs_p ! number of process-local observations |
15 | | INTEGER, INTENT(in) :: npts ! number of points used in observation operator |
16 | | INTEGER, INTENT(in) :: id_obs_p(nobs_p, npts) ! Observation index array |
| 13 | TYPE(obs_f), INTENT(inout) :: thisobs ! Observation type |
| 14 | INTEGER, INTENT(in) :: nrows ! Number of rows required in observation operator |
| 15 | INTEGER, INTENT(in) :: dim_obs_p ! Number of process-local observations |
| 16 | INTEGER, INTENT(in) :: id_obs_p(dim_obs_p, nrows) ! Observation index array |