LTDIRAD Subroutine

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

Uses

  • proc~~ltdirad~2~~UsesGraph proc~ltdirad~2 LTDIRAD MPL_MODULE MPL_MODULE proc~ltdirad~2->MPL_MODULE YOMHOOK YOMHOOK proc~ltdirad~2->YOMHOOK iso_c_binding iso_c_binding proc~ltdirad~2->iso_c_binding module~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD proc~ltdirad~2->module~buffered_allocator_mod module~ledir_mod~2 LEDIR_MOD proc~ltdirad~2->module~ledir_mod~2 module~leinv_mod LEINV_MOD proc~ltdirad~2->module~leinv_mod module~prepsnm_mod PREPSNM_MOD proc~ltdirad~2->module~prepsnm_mod module~tpm_dim TPM_DIM proc~ltdirad~2->module~tpm_dim module~tpm_distr TPM_DISTR proc~ltdirad~2->module~tpm_distr module~tpm_gen TPM_GEN proc~ltdirad~2->module~tpm_gen module~tpm_geometry TPM_GEOMETRY proc~ltdirad~2->module~tpm_geometry module~tpm_stats TPM_STATS proc~ltdirad~2->module~tpm_stats module~tpm_trans~2 TPM_TRANS proc~ltdirad~2->module~tpm_trans~2 module~updspad_mod~2 UPDSPAD_MOD proc~ltdirad~2->module~updspad_mod~2 module~updspbad_mod~2 UPDSPBAD_MOD proc~ltdirad~2->module~updspbad_mod~2 module~uvtvdad_mod UVTVDAD_MOD proc~ltdirad~2->module~uvtvdad_mod module~buffered_allocator_mod->iso_c_binding EC_PARKIND EC_PARKIND module~buffered_allocator_mod->EC_PARKIND 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~ledir_mod~2->module~buffered_allocator_mod module~parkind_ectrans PARKIND_ECTRANS module~ledir_mod~2->module~parkind_ectrans module~tpm_dim->EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_gen->EC_PARKIND module~tpm_geometry->EC_PARKIND module~tpm_trans~2->module~growing_allocator_mod module~tpm_trans~2->module~parkind_ectrans module~growing_allocator_mod->iso_c_binding PARKIND1 PARKIND1 module~parkind_ectrans->PARKIND1

*** LTDIR - Control of Direct Legendre transform step

  • Interface. ---------- CALL LTDIR(...)

    1. PREPARE LEGENDRE POLONOMIALS AND EPSNM --------------------------------------

    2. PREPARE WORK ARRAYS. --------------------

    3. PREPARE FOURIER ARRAYS. ----------------------

    4. COPY WORK ARRAYS TO DEVICE. ---------------------------


    1. UPDATE SPECTRAL ARRAYS. -----------------------

    2. COMPUTE VORTICITY AND DIVERGENCE. ---------------------------------

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

Calls

proc~~ltdirad~2~~CallsGraph proc~ltdirad~2 LTDIRAD dr_hook dr_hook proc~ltdirad~2->dr_hook interface~assign_ptr ASSIGN_PTR proc~ltdirad~2->interface~assign_ptr mpl_barrier mpl_barrier proc~ltdirad~2->mpl_barrier proc~get_allocation GET_ALLOCATION proc~ltdirad~2->proc~get_allocation proc~gstats_nvtx GSTATS_NVTX proc~ltdirad~2->proc~gstats_nvtx proc~ledir_strides LEDIR_STRIDES proc~ltdirad~2->proc~ledir_strides proc~leinv LEINV proc~ltdirad~2->proc~leinv proc~updspad UPDSPAD proc~ltdirad~2->proc~updspad proc~updspbad UPDSPBAD proc~ltdirad~2->proc~updspbad proc~uvtvdad UVTVDAD proc~ltdirad~2->proc~uvtvdad proc~abort_trans ABORT_TRANS proc~get_allocation->proc~abort_trans gstats gstats proc~gstats_nvtx->gstats proc~leinv->dr_hook interface~gemm GEMM proc~leinv->interface~gemm proc~mult_butm MULT_BUTM proc~leinv->proc~mult_butm proc~updspad->proc~updspbad proc~updspbad->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