LTDIRAD_MOD Module


Uses

  • module~~ltdirad_mod~2~~UsesGraph module~ltdirad_mod~2 LTDIRAD_MOD module~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD module~ltdirad_mod~2->module~buffered_allocator_mod module~parkind_ectrans PARKIND_ECTRANS module~ltdirad_mod~2->module~parkind_ectrans EC_PARKIND EC_PARKIND module~buffered_allocator_mod->EC_PARKIND 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 PARKIND1 PARKIND1 module~parkind_ectrans->PARKIND1 module~growing_allocator_mod->iso_c_binding

Used by

  • module~~ltdirad_mod~2~~UsedByGraph module~ltdirad_mod~2 LTDIRAD_MOD proc~dir_trans_ctlad DIR_TRANS_CTLAD proc~dir_trans_ctlad->module~ltdirad_mod~2 proc~ltdir_ctlad LTDIR_CTLAD proc~ltdir_ctlad->module~ltdirad_mod~2

Derived Types

type, public ::  LTDIRAD_HANDLE

Components

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

Functions

public function PREPARE_LTDIRAD(ALLOCATOR, KF_FS, KF_UV) result(HLTDIR)

Arguments

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

Return Value type(LTDIRAD_HANDLE)


Subroutines

public subroutine LTDIRAD(ALLOCATOR, HLTDIR, ZINPS, ZINPA, ZINPS0, ZINPA0, KF_FS, KF_UV, KF_SCALARS, PSPVOR, PSPDIV, PSPSCALAR, PSPSC3A, PSPSC3B, PSPSC2, KFLDPTRUV, KFLDPTRSC)

*** LTDIR - Control of Direct Legendre transform step

Read more…

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(in) :: ALLOCATOR
type(LTDIRAD_HANDLE), intent(in) :: HLTDIR
real(kind=JPRBT), intent(out), POINTER :: ZINPS(:)
real(kind=JPRBT), intent(out), POINTER :: ZINPA(:)
real(kind=JPRD), intent(out), POINTER :: ZINPS0(:)
real(kind=JPRD), intent(out), POINTER :: ZINPA0(:)
integer(kind=JPIM), intent(in) :: KF_FS
integer(kind=JPIM), intent(in) :: KF_UV
integer(kind=JPIM), intent(in) :: KF_SCALARS
real(kind=JPRB), intent(in), optional :: PSPVOR(:,:)
real(kind=JPRB), intent(in), optional :: PSPDIV(:,:)
real(kind=JPRB), intent(in), optional :: PSPSCALAR(:,:)
real(kind=JPRB), intent(in), optional :: PSPSC3A(:,:,:)
real(kind=JPRB), intent(in), optional :: PSPSC3B(:,:,:)
real(kind=JPRB), intent(in), optional :: PSPSC2(:,:)
integer(kind=JPIM), intent(in), optional :: KFLDPTRUV(:)
integer(kind=JPIM), intent(in), optional :: KFLDPTRSC(:)