gdata_io Module



Contents


Derived Types

type, public ::  gdata_io_t

Components

Type Visibility Attributes Name Initial
integer, private :: gdata_size = 0
integer, private :: fvals_start
integer, private :: fvals_end
integer, private :: max_ratio_start
integer, private :: max_ratio_end
integer, private :: apvals_start
integer, private :: apvals_end

Type-Bound Procedures

procedure , public , :: init_gdata_io Subroutine
procedure , public , :: t_io Function
procedure , public , :: entry_size Function
procedure , public , :: read_gdata Subroutine
procedure , public , :: write_gdata Subroutine
procedure , public , :: read_gdata_hdf5 Subroutine
procedure , public , :: write_gdata_hdf5 Subroutine
procedure , public , :: clone_gdata Subroutine

Functions

private function entry_size(this) result(e_size)

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t), intent(in) :: this

Return Value integer

private function t_io(this) result(t_do_io)

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t), intent(in) :: this

Return Value logical


Subroutines

private subroutine init_gdata_io(this, t_aas, t_ms, t_ap, fvals_size_in, max_ratio_size_in, apvals_size_in)

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t) :: this
logical, intent(in) :: t_aas
logical, intent(in) :: t_ms
logical, intent(in) :: t_ap
integer, intent(in) :: fvals_size_in
integer, intent(in) :: max_ratio_size_in
integer, intent(in) :: apvals_size_in

private subroutine read_gdata(this, gdata_buf, ndets, initial)

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t), intent(in) :: this
real(kind=dp), intent(in) :: gdata_buf(:,:)
integer, intent(in) :: ndets
integer, intent(in), optional :: initial

private subroutine write_gdata(this, gdata_buf, ndets, initial, offset_)

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t), intent(inout) :: this
real(kind=dp), intent(out) :: gdata_buf(:,:)
integer, intent(in) :: ndets
integer, intent(in), optional :: initial
integer, intent(in), optional :: offset_

private subroutine read_gdata_hdf5(this, gdata_buf, pos)

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t), intent(in) :: this
integer(kind=hsize_t), intent(in) :: gdata_buf(:)
integer, intent(in) :: pos

private subroutine write_gdata_hdf5(this, gdata_buf, pos)

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t), intent(in) :: this
integer(kind=hsize_t), intent(out) :: gdata_buf(:)
integer, intent(in) :: pos

private subroutine clone_gdata(this, gdata_buf, tmp_fvals_size, fvals_size, tmp_apvals_size, apvals_size, nsigns)

Arguments

Type IntentOptional Attributes Name
class(gdata_io_t), intent(inout) :: this
integer(kind=hsize_t), intent(inout), allocatable :: gdata_buf(:,:)
integer, intent(in) :: tmp_fvals_size
integer, intent(in) :: fvals_size
integer, intent(in) :: tmp_apvals_size
integer, intent(in) :: apvals_size
integer(kind=int64), intent(in) :: nsigns

public subroutine clone_signs(tmp_sgns, tmp_lenof_sign, lenof_sign, num_signs)

Arguments

Type IntentOptional Attributes Name
integer(kind=hsize_t), intent(inout), allocatable :: tmp_sgns(:,:)
integer, intent(in) :: tmp_lenof_sign
integer, intent(in) :: lenof_sign
integer(kind=hsize_t), intent(in) :: num_signs

private subroutine resize_sign(out_sgn, in_sgn)

Arguments

Type IntentOptional Attributes Name
integer(kind=hsize_t), intent(out) :: out_sgn(:)
integer(kind=hsize_t), intent(in) :: in_sgn(:)

public subroutine resize_attribute(attribute, new_size)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout), allocatable :: attribute(:)
integer, intent(in) :: new_size