LTINVAD Subroutine

public subroutine LTINVAD(KM, KMLOC, KF_OUT_LT, KF_UV, KF_SCALARS, KF_SCDERS, KLEI2, KDIM1, PSPVOR, PSPDIV, PSPSCALAR, PSPSC3A, PSPSC3B, PSPSC2, KFLDPTRUV, KFLDPTRSC, FSPGL_PROC)

Uses

  • proc~~ltinvad~2~~UsesGraph proc~ltinvad~2 LTINVAD PARKIND1 PARKIND1 proc~ltinvad~2->PARKIND1 module~asre1bad_mod ASRE1BAD_MOD proc~ltinvad~2->module~asre1bad_mod module~leinvad_mod LEINVAD_MOD proc~ltinvad~2->module~leinvad_mod module~prepsnm_mod PREPSNM_MOD proc~ltinvad~2->module~prepsnm_mod module~prfi1bad_mod~2 PRFI1BAD_MOD proc~ltinvad~2->module~prfi1bad_mod~2 module~spnsdead_mod~2 SPNSDEAD_MOD proc~ltinvad~2->module~spnsdead_mod~2 module~tpm_dim TPM_DIM proc~ltinvad~2->module~tpm_dim module~tpm_geometry TPM_GEOMETRY proc~ltinvad~2->module~tpm_geometry module~tpm_trans TPM_TRANS proc~ltinvad~2->module~tpm_trans module~vdtuvad_mod~2 VDTUVAD_MOD proc~ltinvad~2->module~vdtuvad_mod~2 EC_PARKIND EC_PARKIND module~tpm_dim->EC_PARKIND module~tpm_geometry->EC_PARKIND module~tpm_trans->PARKIND1

*** LTINVAD - Inverse Legendre transform

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

    1. RECOMBINATION SYMMETRIC/ANTISYMMETRIC PART. --------------------------------------------

    2. INVERSE LEGENDRE TRANSFORM. ---------------------------

    3. SPECTRAL COMPUTATIONS FOR U,V AND DERIVATIVES. ----------------------------------------------

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KM
integer(kind=JPIM), intent(in) :: KMLOC
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(inout), optional :: PSPVOR(:,:)
real(kind=JPRB), intent(inout), optional :: PSPDIV(:,:)
real(kind=JPRB), intent(inout), optional :: PSPSCALAR(:,:)
real(kind=JPRB), intent(inout), optional :: PSPSC3A(:,:,:)
real(kind=JPRB), intent(inout), optional :: PSPSC3B(:,:,:)
real(kind=JPRB), intent(inout), optional :: PSPSC2(:,:)
integer(kind=JPIM), intent(in), optional :: KFLDPTRUV(:)
integer(kind=JPIM), intent(in), optional :: KFLDPTRSC(:)
real :: FSPGL_PROC

Calls

proc~~ltinvad~2~~CallsGraph proc~ltinvad~2 LTINVAD proc~asre1bad ASRE1BAD proc~ltinvad~2->proc~asre1bad proc~leinvad LEINVAD proc~ltinvad~2->proc~leinvad proc~prepsnm PREPSNM proc~ltinvad~2->proc~prepsnm proc~prfi1bad PRFI1BAD proc~ltinvad~2->proc~prfi1bad proc~spnsdead SPNSDEAD proc~ltinvad~2->proc~spnsdead proc~vdtuvad VDTUVAD proc~ltinvad~2->proc~vdtuvad dr_hook dr_hook proc~leinvad->dr_hook interface~gemm GEMM proc~leinvad->interface~gemm proc~mult_butm MULT_BUTM proc~leinvad->proc~mult_butm proc~abort_trans ABORT_TRANS proc~prfi1bad->proc~abort_trans 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~mult_butm->interface~gemm abor1 abor1 proc~mult_butm->abor1