PDAF_mod_filterMPI Module


Uses


Variables

Type Visibility Attributes Name Initial
integer, public :: mype_world
integer, public :: npes_world
integer, public :: mype_filter
integer, public :: npes_filter
integer, public :: mype
integer, public :: npes
integer, public :: mype_couple
integer, public :: npes_couple
integer, public :: mype_model
integer, public :: npes_model
integer, public :: error
integer, public :: MPIerr
integer, public :: dim_ens_l
integer, public :: dim_eof_l
integer, public :: COMM_filter
integer, public :: COMM_couple
integer, public :: COMM_pdaf
logical, public :: isset_comm_pdaf = .false.
integer, public :: task_id
logical, public :: filterpe
logical, public :: modelpe
integer, public :: n_modeltasks
integer, public :: MPIstatus(MPI_STATUS_SIZE)
integer, public, ALLOCATABLE :: all_dim_eof_l(:)
integer, public, ALLOCATABLE :: all_dis_eof_l(:)
integer, public, ALLOCATABLE :: all_dim_ens_l(:)
integer, public, ALLOCATABLE :: all_dis_ens_l(:)
integer, public, ALLOCATABLE :: all_npes_model_l(:)
integer, public :: statetask = -1
logical, public :: filter_no_model = .FALSE.
integer, public, ALLOCATABLE :: all_dim_obs_p(:)
integer, public, ALLOCATABLE :: all_dis_obs_p(:)
integer, public :: dimobs_p
integer, public :: dimobs_f

Subroutines

public subroutine PDAF_init_parallel(dim_ens, ensemblefilter, fixedbasis, COMM_model, in_COMM_filter, in_COMM_couple, in_n_modeltasks, in_task_id, screen, flag)

Arguments

Type IntentOptional Attributes Name
integer, intent(inout) :: dim_ens
logical, intent(in) :: ensemblefilter
logical, intent(in) :: fixedbasis
integer, intent(in) :: COMM_model
integer, intent(in) :: in_COMM_filter
integer, intent(in) :: in_COMM_couple
integer, intent(in) :: in_n_modeltasks
integer, intent(in) :: in_task_id
integer, intent(in) :: screen
integer, intent(inout) :: flag