ELTINV_MOD Module


Uses

  • module~~eltinv_mod~~UsesGraph module~eltinv_mod ELTINV_MOD module~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD module~eltinv_mod->module~buffered_allocator_mod 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 module~growing_allocator_mod->iso_c_binding

Used by

  • module~~eltinv_mod~~UsedByGraph module~eltinv_mod ELTINV_MOD proc~einv_trans_ctl EINV_TRANS_CTL proc~einv_trans_ctl->module~eltinv_mod proc~eltinv_ctl ELTINV_CTL proc~eltinv_ctl->module~eltinv_mod

Derived Types

type, public ::  ELTINV_HANDLE

Components

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

Functions

public function PREPARE_ELTINV(ALLOCATOR, KF_UV, KF_SCALARS, KF_SCDERS, KF_OUT_LT) result(HELTINV)

Arguments

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

Return Value type(ELTINV_HANDLE)


Subroutines

public subroutine ELTINV(ALLOCATOR, HELTINV, KF_OUT_LT, KF_UV, KF_SCALARS, KF_SCDERS, KLEI2, KDIM1, FOUBUF_IN, PSPVOR, PSPDIV, PSPSCALAR, PSPSC3A, PSPSC3B, PSPSC2, KFLDPTRUV, KFLDPTRSC, FSPGL_PROC, PSPMEANU, PSPMEANV)

! FIXME !!! USE FSPGL_INT_MOD ,ONLY : FSPGL_INT *** LTINV - Inverse Legendre transform

Read more…

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(in) :: ALLOCATOR
type(ELTINV_HANDLE), intent(in) :: HELTINV
integer(kind=JPIM), intent(in) :: KF_OUT_LT
integer(kind=JPIM), intent(in) :: KF_UV
integer(kind=JPIM), intent(in) :: KF_SCALARS
integer(kind=JPIM), intent(in) :: KF_SCDERS
integer(kind=JPIM), intent(in) :: KLEI2
integer(kind=JPIM), intent(in) :: KDIM1
real(kind=JPRB), intent(out), POINTER :: FOUBUF_IN(:)
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(:)
real :: FSPGL_PROC
real(kind=JPRB), intent(in), optional :: PSPMEANU(:)
real(kind=JPRB), intent(in), optional :: PSPMEANV(:)