mod_parallel_pdaf Module



Variables

Type Visibility Attributes Name Initial
integer(kind=c_int), public, BIND(c) :: n_modeltasks
integer, public :: n_filterpes = 1
integer, public :: COMM_filter
integer(kind=c_int), public, BIND(c) :: mype_filter
integer(kind=c_int), public, BIND(c) :: npes_filter
integer, public, BIND(c) :: COMM_couple
logical, public :: modelpe
logical, public :: filterpe
integer, public, BIND(c) :: task_id
integer, public :: MPIerr
integer, public :: MPIstatus(MPI_STATUS_SIZE)
integer, public, ALLOCATABLE :: local_npes_model(:)
integer, public :: npes_parflow
integer, public :: coupcol
integer, public :: COMM_model
integer(kind=c_int), public, BIND(c) :: COMM_model_pfl
integer(kind=c_int), public, BIND(c) :: mype_model
integer(kind=c_int), public, BIND(c) :: npes_model
integer(kind=c_int), public, BIND(c) :: mype_world
integer(kind=c_int), public, BIND(c) :: npes_world

Interfaces

interface

  • public subroutine read_enkfpar(parname) bind(C, name='read_enkfpar')

    Arguments

    Type IntentOptional Attributes Name
    character(len=1), intent(in), DIMENSION(*) :: parname

Subroutines

public subroutine abort_parallel()

Arguments

None