INV_TRANSAD Subroutine

subroutine INV_TRANSAD(PSPVOR, PSPDIV, PSPSCALAR, PSPSC3A, PSPSC3B, PSPSC2, FSPGL_PROC, LDSCDERS, LDVORGP, LDDIVGP, LDUVDER, KPROMA, KVSETUV, KVSETSC, KRESOL, KVSETSC3A, KVSETSC3B, KVSETSC2, PGP, PGPUV, PGP3A, PGP3B, PGP2)

Uses

  • proc~~inv_transad~2~~UsesGraph proc~inv_transad~2 INV_TRANSAD MPL_MODULE MPL_MODULE proc~inv_transad~2->MPL_MODULE PARKIND1 PARKIND1 proc~inv_transad~2->PARKIND1 YOMHOOK YOMHOOK proc~inv_transad~2->YOMHOOK module~abort_trans_mod ABORT_TRANS_MOD proc~inv_transad~2->module~abort_trans_mod module~inv_trans_ctlad_mod~2 INV_TRANS_CTLAD_MOD proc~inv_transad~2->module~inv_trans_ctlad_mod~2 module~set_resol_mod SET_RESOL_MOD proc~inv_transad~2->module~set_resol_mod module~tpm_distr TPM_DISTR proc~inv_transad~2->module~tpm_distr module~tpm_flt TPM_FLT proc~inv_transad~2->module~tpm_flt module~tpm_gen TPM_GEN proc~inv_transad~2->module~tpm_gen module~tpm_geometry TPM_GEOMETRY proc~inv_transad~2->module~tpm_geometry module~tpm_stats TPM_STATS proc~inv_transad~2->module~tpm_stats module~tpm_trans~2 TPM_TRANS proc~inv_transad~2->module~tpm_trans~2 EC_PARKIND EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_flt->PARKIND1 module~butterfly_alg_mod BUTTERFLY_ALG_MOD module~tpm_flt->module~butterfly_alg_mod module~seefmm_mix seefmm_mix module~tpm_flt->module~seefmm_mix module~tpm_gen->EC_PARKIND module~tpm_geometry->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~butterfly_alg_mod->PARKIND1 module~ectrans_blas_mod ECTRANS_BLAS_MOD module~butterfly_alg_mod->module~ectrans_blas_mod module~interpol_decomp_mod INTERPOL_DECOMP_MOD module~butterfly_alg_mod->module~interpol_decomp_mod module~sharedmem_mod SHAREDMEM_MOD module~butterfly_alg_mod->module~sharedmem_mod iso_c_binding iso_c_binding module~growing_allocator_mod->iso_c_binding module~parkind_ectrans->PARKIND1 ecsort_mix ecsort_mix module~seefmm_mix->ecsort_mix module~wts500_mod WTS500_MOD module~seefmm_mix->module~wts500_mod parkind1 parkind1 module~seefmm_mix->parkind1 module~ectrans_blas_mod->EC_PARKIND module~interpol_decomp_mod->EC_PARKIND module~sharedmem_mod->iso_c_binding

*** INV_TRANSAD - Inverse spectral transform - adjoint.

  • Interface. ---------- CALL INV_TRANSAD(...)

Arguments

Type IntentOptional Attributes Name
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(:,:)
real :: FSPGL_PROC
logical, intent(in), optional :: LDSCDERS
logical, intent(in), optional :: LDVORGP
logical, intent(in), optional :: LDDIVGP
logical, intent(in), optional :: LDUVDER
integer(kind=JPIM), intent(in), optional :: KPROMA
integer(kind=JPIM), intent(in), optional :: KVSETUV(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC(:)
integer(kind=JPIM), intent(in), optional :: KRESOL
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(in), optional :: PGP(:,:,:)
real(kind=JPRB), intent(in), optional :: PGPUV(:,:,:,:)
real(kind=JPRB), intent(in), optional :: PGP3A(:,:,:,:)
real(kind=JPRB), intent(in), optional :: PGP3B(:,:,:,:)
real(kind=JPRB), intent(in), optional :: PGP2(:,:,:)

Calls

proc~~inv_transad~2~~CallsGraph proc~inv_transad~2 INV_TRANSAD dr_hook dr_hook proc~inv_transad~2->dr_hook mpl_barrier mpl_barrier proc~inv_transad~2->mpl_barrier proc~abort_trans ABORT_TRANS proc~inv_transad~2->proc~abort_trans proc~gstats_nvtx GSTATS_NVTX proc~inv_transad~2->proc~gstats_nvtx proc~inv_trans_ctlad INV_TRANS_CTLAD proc~inv_transad~2->proc~inv_trans_ctlad proc~set_resol SET_RESOL proc~inv_transad~2->proc~set_resol 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 gstats gstats proc~gstats_nvtx->gstats proc~field_split FIELD_SPLIT proc~inv_trans_ctlad->proc~field_split proc~ftinv_ctlad FTINV_CTLAD proc~inv_trans_ctlad->proc~ftinv_ctlad proc~ltinv_ctlad LTINV_CTLAD proc~inv_trans_ctlad->proc~ltinv_ctlad proc~shuffle SHUFFLE proc~inv_trans_ctlad->proc~shuffle proc~set_resol->proc~abort_trans proc~ftinv_ctlad->proc~abort_trans proc~ftinv_ctlad->gstats foubuf foubuf proc~ftinv_ctlad->foubuf proc~fourier_inad FOURIER_INAD proc~ftinv_ctlad->proc~fourier_inad proc~fscad FSCAD proc~ftinv_ctlad->proc~fscad proc~ftinvad FTINVAD proc~ftinv_ctlad->proc~ftinvad proc~trgtol TRGTOL proc~ftinv_ctlad->proc~trgtol proc~ltinv_ctlad->gstats foubuf_in foubuf_in proc~ltinv_ctlad->foubuf_in proc~ltinvad LTINVAD proc~ltinv_ctlad->proc~ltinvad proc~trltom TRLTOM proc~ltinv_ctlad->proc~trltom proc~fourier_inad->foubuf proc~exec_fftw EXEC_FFTW proc~ftinvad->proc~exec_fftw proc~asre1bad ASRE1BAD proc~ltinvad->proc~asre1bad proc~leinvad LEINVAD proc~ltinvad->proc~leinvad proc~prepsnm PREPSNM proc~ltinvad->proc~prepsnm proc~prfi1bad PRFI1BAD proc~ltinvad->proc~prfi1bad proc~spnsdead SPNSDEAD proc~ltinvad->proc~spnsdead proc~vdtuvad VDTUVAD proc~ltinvad->proc~vdtuvad proc~trgtol->dr_hook proc~trgtol->mpl_barrier proc~trgtol->proc~abort_trans proc~trgtol->gstats gstats_barrier gstats_barrier proc~trgtol->gstats_barrier gstats_barrier2 gstats_barrier2 proc~trgtol->gstats_barrier2 mpl_recv mpl_recv proc~trgtol->mpl_recv mpl_send mpl_send proc~trgtol->mpl_send mpl_wait mpl_wait proc~trgtol->mpl_wait mpl_waitany mpl_waitany proc~trgtol->mpl_waitany proc~inigptr INIGPTR proc~trgtol->proc~inigptr proc~pe2set PE2SET proc~trgtol->proc~pe2set proc~trltom->dr_hook proc~trltom->gstats proc~trltom->gstats_barrier proc~trltom->gstats_barrier2 mpl_alltoallv mpl_alltoallv proc~trltom->mpl_alltoallv proc~asre1bad->foubuf_in 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~leinvad->dr_hook interface~gemm GEMM proc~leinvad->interface~gemm proc~mult_butm MULT_BUTM proc~leinvad->proc~mult_butm proc~pe2set->proc~abort_trans proc~prfi1bad->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~mult_butm->abor1 proc~mult_butm->interface~gemm