Changes between Version 2 and Version 3 of PDAF_iau_init_inc


Ignore:
Timestamp:
Mar 26, 2025, 6:01:11 PM (6 days ago)
Author:
lnerger
Comment:

--

Legend:

Unmodified
Added
Removed
Modified

  • PDAF_iau_init_inc

    v2 v3  
    1212  SUBROUTINE PDAF_iau_init_inc(dim_p, dim_ens_l, ens_inc, flag)
    1313
    14     INTEGER, INTENT(in) :: dim_p                    !< PE-local dimension of model state
    15     INTEGER, INTENT(in) :: dim_ens_l                !< Task-local size of ensemble
    16     REAL, INTENT(in) :: ens_inc(dim_p, dim_ens_l)   !< PE-local increment ensemble
    17     INTEGER, INTENT(out) :: flag                    !< Status flag
     14    INTEGER, INTENT(in) :: dim_p                    ! PE-local dimension of model state
     15    INTEGER, INTENT(in) :: dim_ens_l                ! Task-local size of ensemble
     16    REAL, INTENT(in) :: ens_inc(dim_p, dim_ens_l)   ! PE-local increment ensemble
     17    INTEGER, INTENT(out) :: flag                    ! Status flag
    1818}}}
    1919