easy_netcdf_read_mpi Module


Uses

  • module~~easy_netcdf_read_mpi~~UsesGraph module~easy_netcdf_read_mpi easy_netcdf_read_mpi module~easy_netcdf~2 easy_netcdf module~easy_netcdf_read_mpi->module~easy_netcdf~2 module~radiation_io~2 radiation_io module~easy_netcdf_read_mpi->module~radiation_io~2 module~parkind1~2 PARKIND1 module~easy_netcdf_read_mpi->module~parkind1~2 module~easy_netcdf~2->module~radiation_io~2 module~easy_netcdf~2->module~parkind1~2 netcdf netcdf module~easy_netcdf~2->netcdf module~yomlun_ifsaux YOMLUN_IFSAUX module~radiation_io~2->module~yomlun_ifsaux module~yomlun_ifsaux->module~parkind1~2

Contents


Variables

Type Visibility Attributes Name Initial
integer(kind=jpim), public, parameter :: mtagrad = 2800

Derived Types

type, public ::  netcdf_file

Components

Type Visibility Attributes Name Initial
type(netcdf_file), public :: file
logical, public :: is_master_task = .true.

Type-Bound Procedures

procedure , public :: open => open_netcdf_file Subroutine
procedure , public :: close => close_netcdf_file Subroutine
procedure , public :: get_real_scalar Subroutine
procedure , public :: get_real_vector Subroutine
procedure , public :: get_real_matrix Subroutine
procedure , public :: get_real_array3 Subroutine
generic, public :: get => get_real_scalar, get_real_vector, get_real_matrix, get_real_array3
procedure , public :: get_global_attribute Subroutine
procedure , public :: set_verbose Subroutine
procedure , public :: transpose_matrices Subroutine
procedure , public :: exists Function

Functions

public function exists(this, var_name) result(is_present)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
character(len=*), intent(in) :: var_name

Return Value logical


Subroutines

public subroutine open_netcdf_file(this, file_name, iverbose)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
character(len=*), intent(in) :: file_name
integer, intent(in), optional :: iverbose

public subroutine close_netcdf_file(this)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this

public subroutine set_verbose(this, ival)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
integer, optional :: ival

public subroutine transpose_matrices(this, do_transpose)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
logical, optional :: do_transpose

public subroutine get_real_scalar(this, var_name, scalar)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
character(len=*), intent(in) :: var_name
real(kind=jprb), intent(out) :: scalar

public subroutine get_real_vector(this, var_name, vector)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
character(len=*), intent(in) :: var_name
real(kind=jprb), intent(out), allocatable :: vector(:)

public subroutine get_real_matrix(this, var_name, matrix, do_transp)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
character(len=*), intent(in) :: var_name
real(kind=jprb), intent(out), allocatable :: matrix(:,:)
logical, intent(in), optional :: do_transp

public subroutine get_real_array3(this, var_name, var, ipermute)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
character(len=*), intent(in) :: var_name
real(kind=jprb), intent(out), allocatable :: var(:,:,:)
integer, intent(in), optional :: ipermute(3)

public subroutine get_global_attribute(this, attr_name, attr_str)

Arguments

Type IntentOptional Attributes Name
class(netcdf_file) :: this
character(len=*), intent(in) :: attr_name
character(len=*), intent(inout) :: attr_str