TRMTOL_PACK_UNPACK Module


Uses

  • module~~trmtol_pack_unpack~~UsesGraph module~trmtol_pack_unpack TRMTOL_PACK_UNPACK module~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD module~trmtol_pack_unpack->module~buffered_allocator_mod iso_c_binding iso_c_binding module~buffered_allocator_mod->iso_c_binding module~abort_trans_mod ABORT_TRANS_MOD module~buffered_allocator_mod->module~abort_trans_mod module~growing_allocator_mod GROWING_ALLOCATOR_MOD module~buffered_allocator_mod->module~growing_allocator_mod module~parkind_ectrans PARKIND_ECTRANS module~buffered_allocator_mod->module~parkind_ectrans module~growing_allocator_mod->iso_c_binding PARKIND1 PARKIND1 module~parkind_ectrans->PARKIND1

Used by

  • module~~trmtol_pack_unpack~~UsedByGraph module~trmtol_pack_unpack TRMTOL_PACK_UNPACK proc~inv_trans_ctl INV_TRANS_CTL proc~inv_trans_ctl->module~trmtol_pack_unpack

Derived Types

type, public ::  TRMTOL_PACK_HANDLE

Components

Type Visibility Attributes Name Initial
type(ALLOCATION_RESERVATION_HANDLE), public :: HFOUBUF_IN

type, public ::  TRMTOL_UNPACK_HANDLE

Components

Type Visibility Attributes Name Initial
type(ALLOCATION_RESERVATION_HANDLE), public :: HREEL

Functions

public function PREPARE_TRMTOL_PACK(ALLOCATOR, KF_LEG) result(HTRMTOL_PACK)

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(inout) :: ALLOCATOR
integer(kind=JPIM), intent(in) :: KF_LEG

Return Value type(TRMTOL_PACK_HANDLE)

public function PREPARE_TRMTOL_UNPACK(ALLOCATOR, KF_FS) result(HTRMTOL_UNPACK)

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(inout) :: ALLOCATOR
integer(kind=JPIM) :: KF_FS

Return Value type(TRMTOL_UNPACK_HANDLE)


Subroutines

public subroutine TRMTOL_PACK(ALLOCATOR, HTRMTOL_PACK, ZOUTS, ZOUTA, ZOUTS0, ZOUTA0, FOUBUF_IN, KF_LEG)

*** TRMTOL_PACK - Packing buffer for TRMTOL

Read more…

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(in) :: ALLOCATOR
type(TRMTOL_PACK_HANDLE), intent(in) :: HTRMTOL_PACK
real(kind=JPRBT), intent(in) :: ZOUTS(:)
real(kind=JPRBT), intent(in) :: ZOUTA(:)
real(kind=JPRD), intent(in) :: ZOUTS0(:)
real(kind=JPRD), intent(in) :: ZOUTA0(:)
real(kind=JPRB), intent(out), POINTER :: FOUBUF_IN(:)
integer(kind=JPIM), intent(in) :: KF_LEG

public subroutine TRMTOL_UNPACK(ALLOCATOR, HTRMTOL_UNPACK, FOUBUF, PREEL_COMPLEX, KF_CURRENT, KF_TOTAL)

*** TRMTOL_UNPACK - Copy fourier data from buffer to local array

Read more…

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(in) :: ALLOCATOR
type(TRMTOL_UNPACK_HANDLE), intent(in) :: HTRMTOL_UNPACK
real(kind=JPRBT), intent(in) :: FOUBUF(:)
real(kind=JPRBT), intent(out), POINTER :: PREEL_COMPLEX(:)
integer(kind=JPIM), intent(in) :: KF_CURRENT
integer(kind=JPIM), intent(in) :: KF_TOTAL