Changes between Version 3 and Version 4 of PDAFomi_set_icoeff_p


Ignore:
Timestamp:
Nov 24, 2024, 5:12:40 PM (7 days ago)
Author:
lnerger
Comment:

--

Legend:

Unmodified
Added
Removed
Modified
  • PDAFomi_set_icoeff_p

    v3 v4  
    99The interface is:
    1010{{{
    11   SUBROUTINE PDAFomi_set_icoeff_p(thisobs, nobs_p, ntps, icoeff_p)
     11  SUBROUTINE PDAFomi_set_icoeff_p(thisobs, nrows, dim_obs_p, id_obs_p)
    1212
    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     REAL, INTENT(in) :: icoeff_p(nobs_p, npts)      ! Array of interpolation coefficients
     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    REAL, INTENT(in) :: icoeff_p(nrows, dim_obs_p)     ! Array of interpolation coefficients
    1717}}}
    1818