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

*** 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~~CallsGraph proc~inv_transad INV_TRANSAD dr_hook dr_hook proc~inv_transad->dr_hook mpl_barrier mpl_barrier proc~inv_transad->mpl_barrier proc~abort_trans ABORT_TRANS proc~inv_transad->proc~abort_trans proc~gstats_nvtx GSTATS_NVTX proc~inv_transad->proc~gstats_nvtx proc~inv_trans_ctlad INV_TRANS_CTLAD proc~inv_transad->proc~inv_trans_ctlad proc~set_resol SET_RESOL proc~inv_transad->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~ltinvad->dr_hook proc~ltinvad->mpl_barrier proc~ltinvad->proc~abort_trans proc~ltinvad->proc~gstats_nvtx interface~assign_ptr ASSIGN_PTR proc~ltinvad->interface~assign_ptr proc~get_allocation GET_ALLOCATION proc~ltinvad->proc~get_allocation proc~ledir LEDIR proc~ltinvad->proc~ledir proc~leinv_strides LEINV_STRIDES proc~ltinvad->proc~leinv_strides 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~gstats_nvtx proc~trgtol->mpl_abort ext_acc_create ext_acc_create proc~trgtol->ext_acc_create ext_acc_delete ext_acc_delete proc~trgtol->ext_acc_delete ext_acc_pass ext_acc_pass proc~trgtol->ext_acc_pass proc~trgtol->interface~assign_ptr mpl_recv mpl_recv proc~trgtol->mpl_recv mpl_send mpl_send proc~trgtol->mpl_send mpl_wait mpl_wait proc~trgtol->mpl_wait proc~trgtol->proc~get_allocation proc~pe2set PE2SET proc~trgtol->proc~pe2set proc~trltom->dr_hook proc~trltom->mpl_barrier proc~trltom->proc~abort_trans proc~trltom->proc~gstats_nvtx proc~trltom->interface~assign_ptr mpl_alltoallv mpl_alltoallv proc~trltom->mpl_alltoallv mpl_myrank mpl_myrank proc~trltom->mpl_myrank proc~trltom->proc~get_allocation 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~get_allocation->proc~abort_trans proc~ledir->dr_hook interface~gemm GEMM proc~ledir->interface~gemm proc~mult_butm MULT_BUTM proc~ledir->proc~mult_butm zb_d zb_d proc~ledir->zb_d zca_d zca_d proc~ledir->zca_d zcs_d zcs_d proc~ledir->zcs_d zrpnma zrpnma proc~ledir->zrpnma zrpnms zrpnms proc~ledir->zrpnms 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