Changes between Version 6 and Version 7 of PDAF_diag_stddev_nompi


Ignore:
Timestamp:
Mar 26, 2025, 2:16:14 PM (6 days ago)
Author:
lnerger
Comment:

--

Legend:

Unmodified
Added
Removed
Modified

  • PDAF_diag_stddev_nompi

    v6 v7  
    1414     state, ens, stddev, do_mean, status)
    1515
    16   INTEGER, INTENT(in) :: dim               !< state dimension
    17   INTEGER, INTENT(in) :: dim_ens           !< Ensemble size
    18   REAL, INTENT(inout) :: state(dim)        !< State vector
    19   REAL, INTENT(in)    :: ens(dim, dim_ens) !< State ensemble
    20   REAL, INTENT(out)   :: stddev            !< Standard deviation of ensemble
    21   INTEGER, INTENT(in) :: do_mean           !< 1 to also compute ensemble mean; 0 for no computation of mean
    22   INTEGER, INTENT(out) :: status           !< Status flag (0=success)
     16  INTEGER, INTENT(in) :: dim               ! state dimension
     17  INTEGER, INTENT(in) :: dim_ens           ! Ensemble size
     18  REAL, INTENT(inout) :: state(dim)        ! State vector
     19  REAL, INTENT(in)    :: ens(dim, dim_ens) ! State ensemble
     20  REAL, INTENT(out)   :: stddev            ! Standard deviation of ensemble
     21  INTEGER, INTENT(in) :: do_mean           ! 1 to also compute ensemble mean;
     22                                           ! 0 for no computation of mean
     23  INTEGER, INTENT(out) :: status           ! Status flag (0=success)
    2324}}}
    2425