ELTINV Subroutine

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)

Uses

  • proc~~eltinv~~UsesGraph proc~eltinv ELTINV PARKIND1 PARKIND1 proc~eltinv->PARKIND1 YOMHOOK YOMHOOK proc~eltinv->YOMHOOK iso_c_binding iso_c_binding proc~eltinv->iso_c_binding module~abort_trans_mod ABORT_TRANS_MOD proc~eltinv->module~abort_trans_mod module~easre1b_mod EASRE1B_MOD proc~eltinv->module~easre1b_mod module~eleinv_mod~2 ELEINV_MOD proc~eltinv->module~eleinv_mod~2 module~eprfi1b_mod~2 EPRFI1B_MOD proc~eltinv->module~eprfi1b_mod~2 module~espnsde_mod ESPNSDE_MOD proc~eltinv->module~espnsde_mod module~evdtuv_mod EVDTUV_MOD proc~eltinv->module~evdtuv_mod module~tpm_dim TPM_DIM proc~eltinv->module~tpm_dim module~tpm_distr TPM_DISTR proc~eltinv->module~tpm_distr module~tpm_trans~2 TPM_TRANS proc~eltinv->module~tpm_trans~2 module~tpmald_dim TPMALD_DIM proc~eltinv->module~tpmald_dim EC_PARKIND EC_PARKIND module~tpm_dim->EC_PARKIND module~tpm_distr->EC_PARKIND module~growing_allocator_mod GROWING_ALLOCATOR_MOD module~tpm_trans~2->module~growing_allocator_mod module~parkind_ectrans PARKIND_ECTRANS module~tpm_trans~2->module~parkind_ectrans module~tpmald_dim->EC_PARKIND module~growing_allocator_mod->iso_c_binding module~parkind_ectrans->PARKIND1

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

  • Interface. ---------- CALL *LTINV(...)

    1. INVERSE LEGENDRE TRANSFORM. ---------------------------

    2. RECOMBINATION SYMMETRIC/ANTISYMMETRIC PART. --------------------------------------------

! FIXME !!! CALL FSPGL_INT(KF_UV,KF_SCALARS,KF_SCDERS,KF_OUT_LT,FSPGL_PROC,& ! FIXME !!! & KFLDPTRUV,KFLDPTRSC)

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(:)

Calls

proc~~eltinv~~CallsGraph proc~eltinv ELTINV dr_hook dr_hook proc~eltinv->dr_hook interface~assign_ptr ASSIGN_PTR proc~eltinv->interface~assign_ptr proc~abort_trans ABORT_TRANS proc~eltinv->proc~abort_trans proc~easre1b EASRE1B proc~eltinv->proc~easre1b proc~eleinv ELEINV proc~eltinv->proc~eleinv proc~eprfi1b EPRFI1B proc~eltinv->proc~eprfi1b proc~espnsde ESPNSDE proc~eltinv->proc~espnsde proc~evdtuv EVDTUV proc~eltinv->proc~evdtuv proc~get_allocation GET_ALLOCATION proc~eltinv->proc~get_allocation mpl_abort mpl_abort proc~abort_trans->mpl_abort sdl_srlabort sdl_srlabort proc~abort_trans->sdl_srlabort sdl_traceback sdl_traceback proc~abort_trans->sdl_traceback proc~easre1b->dr_hook proc~eleinv->dr_hook interface~execute_inv_fft EXECUTE_INV_FFT proc~eleinv->interface~execute_inv_fft proc~eprfi1b->dr_hook proc~espnsde->dr_hook proc~evdtuv->dr_hook proc~get_allocation->proc~abort_trans

Called by

proc~~eltinv~~CalledByGraph proc~eltinv ELTINV proc~einv_trans_ctl EINV_TRANS_CTL proc~einv_trans_ctl->proc~eltinv proc~eltinv_ctl ELTINV_CTL proc~eltinv_ctl->proc~eltinv proc~einv_trans EINV_TRANS proc~einv_trans->proc~einv_trans_ctl proc~einv_trans_ctl~2 EINV_TRANS_CTL proc~einv_trans_ctl~2->proc~eltinv_ctl proc~einv_trans~2 EINV_TRANS proc~einv_trans~2->proc~einv_trans_ctl