ELTINV_CTLAD Subroutine

public subroutine ELTINV_CTLAD(KF_OUT_LT, KF_UV, KF_SCALARS, KF_SCDERS, PSPVOR, PSPDIV, PSPSCALAR, PSPSC3A, PSPSC3B, PSPSC2, KFLDPTRUV, KFLDPTRSC, FSPGL_PROC, PSPMEANU, PSPMEANV)

Uses

  • proc~~eltinv_ctlad~~UsesGraph proc~eltinv_ctlad ELTINV_CTLAD PARKIND1 PARKIND1 proc~eltinv_ctlad->PARKIND1 YOMHOOK YOMHOOK proc~eltinv_ctlad->YOMHOOK module~eltinvad_mod ELTINVAD_MOD proc~eltinv_ctlad->module~eltinvad_mod module~tpm_distr TPM_DISTR proc~eltinv_ctlad->module~tpm_distr module~tpm_gen TPM_GEN proc~eltinv_ctlad->module~tpm_gen module~tpm_trans~2 TPM_TRANS proc~eltinv_ctlad->module~tpm_trans~2 module~trltom_mod~2 TRLTOM_MOD proc~eltinv_ctlad->module~trltom_mod~2 EC_PARKIND EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_gen->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~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD module~trltom_mod~2->module~buffered_allocator_mod module~buffered_allocator_mod->EC_PARKIND module~buffered_allocator_mod->module~growing_allocator_mod 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->iso_c_binding module~parkind_ectrans->PARKIND1

*** ELTINV_CTLAD - Control routine for inverse Legandre transform - adj.

  • Interface. ---------- CALL EINV_TRANS_CTL(...) KF_OUT_LT - number of fields coming out from inverse LT KF_UV - local number of spectral u-v fields KF_SCALARS - local number of scalar spectral fields KF_SCDERS - local number of derivatives of scalar spectral fields PSPVOR(:,:) - spectral vorticity (input) PSPDIV(:,:) - spectral divergence (input) PSPSCALAR(:,:) - spectral scalarvalued fields (input) KFLDPTRUV(:) - field pointer array for vor./div. KFLDPTRSC(:) - field pointer array for PSPSCALAR FSPGL_PROC - external procedure to be executed in fourier space before transposition

Arguments

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

Calls

proc~~eltinv_ctlad~~CallsGraph proc~eltinv_ctlad ELTINV_CTLAD dr_hook dr_hook proc~eltinv_ctlad->dr_hook foubuf_in foubuf_in proc~eltinv_ctlad->foubuf_in gstats gstats proc~eltinv_ctlad->gstats proc~eltinvad ELTINVAD proc~eltinv_ctlad->proc~eltinvad proc~trltom TRLTOM proc~eltinv_ctlad->proc~trltom proc~eltinvad->dr_hook proc~easre1bad EASRE1BAD proc~eltinvad->proc~easre1bad proc~eleinvad ELEINVAD proc~eltinvad->proc~eleinvad proc~eprfi1bad EPRFI1BAD proc~eltinvad->proc~eprfi1bad proc~espnsdead ESPNSDEAD proc~eltinvad->proc~espnsdead proc~evdtuvad EVDTUVAD proc~eltinvad->proc~evdtuvad proc~evdtuvad_comm EVDTUVAD_COMM proc~eltinvad->proc~evdtuvad_comm proc~extper EXTPER proc~eltinvad->proc~extper proc~trltom->dr_hook interface~assign_ptr ASSIGN_PTR proc~trltom->interface~assign_ptr mpl_barrier mpl_barrier proc~trltom->mpl_barrier mpl_myrank mpl_myrank proc~trltom->mpl_myrank proc~abort_trans ABORT_TRANS proc~trltom->proc~abort_trans proc~get_allocation GET_ALLOCATION proc~trltom->proc~get_allocation proc~gstats_nvtx GSTATS_NVTX proc~trltom->proc~gstats_nvtx 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~easre1bad->dr_hook proc~easre1bad->foubuf_in proc~eleinvad->dr_hook proc~exec_efftw EXEC_EFFTW proc~eleinvad->proc~exec_efftw proc~eprfi1bad->dr_hook proc~espnsdead->dr_hook proc~evdtuvad->dr_hook proc~evdtuvad_comm->dr_hook proc~evdtuvad_comm->proc~abort_trans mpl_recv mpl_recv proc~evdtuvad_comm->mpl_recv mpl_send mpl_send proc~evdtuvad_comm->mpl_send mpl_wait mpl_wait proc~evdtuvad_comm->mpl_wait proc~set2pe SET2PE proc~evdtuvad_comm->proc~set2pe proc~extper->dr_hook abor1 abor1 proc~extper->abor1 proc~get_allocation->proc~abort_trans proc~gstats_nvtx->gstats proc~exec_efftw->dr_hook proc~exec_efftw->abor1 dfftw_execute_dft_c2r dfftw_execute_dft_c2r proc~exec_efftw->dfftw_execute_dft_c2r dfftw_execute_dft_r2c dfftw_execute_dft_r2c proc~exec_efftw->dfftw_execute_dft_r2c fftw_alloc_complex fftw_alloc_complex proc~exec_efftw->fftw_alloc_complex fftw_free fftw_free proc~exec_efftw->fftw_free fftwf_alloc_complex fftwf_alloc_complex proc~exec_efftw->fftwf_alloc_complex fftwf_free fftwf_free proc~exec_efftw->fftwf_free proc~create_plan_fftw CREATE_PLAN_FFTW proc~exec_efftw->proc~create_plan_fftw sfftw_execute_dft_c2r sfftw_execute_dft_c2r proc~exec_efftw->sfftw_execute_dft_c2r sfftw_execute_dft_r2c sfftw_execute_dft_r2c proc~exec_efftw->sfftw_execute_dft_r2c proc~set2pe->proc~abort_trans proc~set2pe->abor1 proc~create_plan_fftw->dr_hook proc~create_plan_fftw->abor1 proc~create_plan_fftw->fftw_alloc_complex proc~create_plan_fftw->fftw_free proc~create_plan_fftw->fftwf_alloc_complex proc~create_plan_fftw->fftwf_free dfftw_destroy_plan dfftw_destroy_plan proc~create_plan_fftw->dfftw_destroy_plan dfftw_plan_many_dft_c2r dfftw_plan_many_dft_c2r proc~create_plan_fftw->dfftw_plan_many_dft_c2r dfftw_plan_many_dft_r2c dfftw_plan_many_dft_r2c proc~create_plan_fftw->dfftw_plan_many_dft_r2c sfftw_destroy_plan sfftw_destroy_plan proc~create_plan_fftw->sfftw_destroy_plan sfftw_plan_many_dft_c2r sfftw_plan_many_dft_c2r proc~create_plan_fftw->sfftw_plan_many_dft_c2r sfftw_plan_many_dft_r2c sfftw_plan_many_dft_r2c proc~create_plan_fftw->sfftw_plan_many_dft_r2c

Called by

proc~~eltinv_ctlad~~CalledByGraph proc~eltinv_ctlad ELTINV_CTLAD proc~einv_trans_ctlad EINV_TRANS_CTLAD proc~einv_trans_ctlad->proc~eltinv_ctlad proc~einv_transad EINV_TRANSAD proc~einv_transad->proc~einv_trans_ctlad