EINV_TRANS_CTL Subroutine

public subroutine EINV_TRANS_CTL(KF_UV_G, KF_SCALARS_G, KF_GP, KF_FS, KF_OUT_LT, KF_UV, KF_SCALARS, KF_SCDERS, PSPVOR, PSPDIV, PSPSCALAR, KVSETUV, KVSETSC, PGP, FSPGL_PROC, PSPSC3A, PSPSC3B, PSPSC2, KVSETSC3A, KVSETSC3B, KVSETSC2, PGPUV, PGP3A, PGP3B, PGP2, PSPMEANU, PSPMEANV)

Uses

  • proc~~einv_trans_ctl~~UsesGraph proc~einv_trans_ctl EINV_TRANS_CTL PARKIND1 PARKIND1 proc~einv_trans_ctl->PARKIND1 YOMHOOK YOMHOOK proc~einv_trans_ctl->YOMHOOK module~eftinv_ctl_mod EFTINV_CTL_MOD proc~einv_trans_ctl->module~eftinv_ctl_mod module~eltinv_ctl_mod ELTINV_CTL_MOD proc~einv_trans_ctl->module~eltinv_ctl_mod module~field_split_mod FIELD_SPLIT_MOD proc~einv_trans_ctl->module~field_split_mod module~shuffle_mod SHUFFLE_MOD proc~einv_trans_ctl->module~shuffle_mod module~tpm_gen TPM_GEN proc~einv_trans_ctl->module~tpm_gen module~tpm_trans TPM_TRANS proc~einv_trans_ctl->module~tpm_trans EC_PARKIND EC_PARKIND module~tpm_gen->EC_PARKIND module~tpm_trans->PARKIND1

*** EINV_TRANS_CTL - Control routine for inverse spectral transform.

  • Interface. ---------- CALL EINV_TRANS_CTL(...)

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KF_UV_G
integer(kind=JPIM), intent(in) :: KF_SCALARS_G
integer(kind=JPIM), intent(in) :: KF_GP
integer(kind=JPIM), intent(in) :: KF_FS
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(in), optional :: PSPVOR(:,:)
real(kind=JPRB), intent(in), optional :: PSPDIV(:,:)
real(kind=JPRB), intent(in), optional :: PSPSCALAR(:,:)
integer(kind=JPIM), intent(in), optional :: KVSETUV(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC(:)
real(kind=JPRB), intent(out), optional :: PGP(:,:,:)
real :: FSPGL_PROC
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 :: KVSETSC3A(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC3B(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC2(:)
real(kind=JPRB), intent(out), optional :: PGPUV(:,:,:,:)
real(kind=JPRB), intent(out), optional :: PGP3A(:,:,:,:)
real(kind=JPRB), intent(out), optional :: PGP3B(:,:,:,:)
real(kind=JPRB), intent(out), optional :: PGP2(:,:,:)
real(kind=JPRB), intent(in), optional :: PSPMEANU(:)
real(kind=JPRB), intent(in), optional :: PSPMEANV(:)

Calls

proc~~einv_trans_ctl~~CallsGraph proc~einv_trans_ctl EINV_TRANS_CTL dr_hook dr_hook proc~einv_trans_ctl->dr_hook proc~eftinv_ctl EFTINV_CTL proc~einv_trans_ctl->proc~eftinv_ctl proc~eltinv_ctl ELTINV_CTL proc~einv_trans_ctl->proc~eltinv_ctl proc~field_split FIELD_SPLIT proc~einv_trans_ctl->proc~field_split proc~shuffle SHUFFLE proc~einv_trans_ctl->proc~shuffle proc~eftinv_ctl->dr_hook gstats gstats proc~eftinv_ctl->gstats proc~abort_trans ABORT_TRANS proc~eftinv_ctl->proc~abort_trans proc~efsc EFSC proc~eftinv_ctl->proc~efsc proc~fourier_in FOURIER_IN proc~eftinv_ctl->proc~fourier_in proc~ftinv FTINV proc~eftinv_ctl->proc~ftinv proc~trltog TRLTOG proc~eftinv_ctl->proc~trltog proc~eltinv_ctl->dr_hook proc~eltinv_ctl->gstats proc~eltinv ELTINV proc~eltinv_ctl->proc~eltinv proc~trmtol TRMTOL proc~eltinv_ctl->proc~trmtol 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~efsc->dr_hook proc~eltinv->dr_hook 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~fspgl_int FSPGL_INT proc~eltinv->proc~fspgl_int proc~exec_fftw EXEC_FFTW proc~ftinv->proc~exec_fftw proc~trltog->dr_hook proc~trltog->gstats proc~trltog->proc~abort_trans gstats_barrier gstats_barrier proc~trltog->gstats_barrier gstats_barrier2 gstats_barrier2 proc~trltog->gstats_barrier2 mpl_barrier mpl_barrier proc~trltog->mpl_barrier mpl_recv mpl_recv proc~trltog->mpl_recv mpl_send mpl_send proc~trltog->mpl_send mpl_wait mpl_wait proc~trltog->mpl_wait mpl_waitany mpl_waitany proc~trltog->mpl_waitany proc~inigptr INIGPTR proc~trltog->proc~inigptr proc~pe2set PE2SET proc~trltog->proc~pe2set proc~trmtol->dr_hook proc~trmtol->gstats proc~trmtol->gstats_barrier proc~trmtol->gstats_barrier2 mpl_alltoallv mpl_alltoallv proc~trmtol->mpl_alltoallv proc~easre1b->dr_hook proc~eleinv->dr_hook proc~exec_efftw EXEC_EFFTW proc~eleinv->proc~exec_efftw proc~eprfi1b->dr_hook proc~espnsde->dr_hook proc~evdtuv->dr_hook proc~exec_fftw->dr_hook abor1 abor1 proc~exec_fftw->abor1 dfftw_execute_dft_c2r dfftw_execute_dft_c2r proc~exec_fftw->dfftw_execute_dft_c2r dfftw_execute_dft_r2c dfftw_execute_dft_r2c proc~exec_fftw->dfftw_execute_dft_r2c fftw_alloc_complex fftw_alloc_complex proc~exec_fftw->fftw_alloc_complex fftw_free fftw_free proc~exec_fftw->fftw_free fftwf_alloc_complex fftwf_alloc_complex proc~exec_fftw->fftwf_alloc_complex fftwf_free fftwf_free proc~exec_fftw->fftwf_free proc~create_plan_fftw CREATE_PLAN_FFTW proc~exec_fftw->proc~create_plan_fftw sfftw_execute_dft_c2r sfftw_execute_dft_c2r proc~exec_fftw->sfftw_execute_dft_c2r sfftw_execute_dft_r2c sfftw_execute_dft_r2c proc~exec_fftw->sfftw_execute_dft_r2c proc~inigptr->proc~abort_trans proc~pe2set->proc~abort_trans 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 proc~exec_efftw->dr_hook proc~exec_efftw->abor1 proc~exec_efftw->dfftw_execute_dft_c2r proc~exec_efftw->dfftw_execute_dft_r2c proc~exec_efftw->fftw_alloc_complex proc~exec_efftw->fftw_free proc~exec_efftw->fftwf_alloc_complex proc~exec_efftw->fftwf_free proc~exec_efftw->proc~create_plan_fftw proc~exec_efftw->sfftw_execute_dft_c2r proc~exec_efftw->sfftw_execute_dft_r2c

Called by

proc~~einv_trans_ctl~~CalledByGraph proc~einv_trans_ctl EINV_TRANS_CTL proc~einv_trans EINV_TRANS proc~einv_trans->proc~einv_trans_ctl