DIR_TRANSAD Subroutine

subroutine DIR_TRANSAD(PSPVOR, PSPDIV, PSPSCALAR, PSPSC3A, PSPSC3B, PSPSC2, KPROMA, KVSETUV, KVSETSC, KRESOL, KVSETSC3A, KVSETSC3B, KVSETSC2, PGP, PGPUV, PGP3A, PGP3B, PGP2)

Uses

  • proc~~dir_transad~2~~UsesGraph proc~dir_transad~2 DIR_TRANSAD MPL_MODULE MPL_MODULE proc~dir_transad~2->MPL_MODULE PARKIND1 PARKIND1 proc~dir_transad~2->PARKIND1 YOMHOOK YOMHOOK proc~dir_transad~2->YOMHOOK module~abort_trans_mod ABORT_TRANS_MOD proc~dir_transad~2->module~abort_trans_mod module~dir_trans_ctlad_mod DIR_TRANS_CTLAD_MOD proc~dir_transad~2->module~dir_trans_ctlad_mod module~set_resol_mod SET_RESOL_MOD proc~dir_transad~2->module~set_resol_mod module~tpm_distr TPM_DISTR proc~dir_transad~2->module~tpm_distr module~tpm_flt TPM_FLT proc~dir_transad~2->module~tpm_flt module~tpm_gen TPM_GEN proc~dir_transad~2->module~tpm_gen module~tpm_geometry TPM_GEOMETRY proc~dir_transad~2->module~tpm_geometry module~tpm_stats TPM_STATS proc~dir_transad~2->module~tpm_stats module~tpm_trans~2 TPM_TRANS proc~dir_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

*** DIR_TRANSAD - Direct spectral transform - adjoint.

  • Interface. ---------- CALL DIR_TRANSAD(...)

Arguments

Type IntentOptional Attributes Name
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 :: 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(out), optional :: PGP(:,:,:)
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(:,:,:)

Calls

proc~~dir_transad~2~~CallsGraph proc~dir_transad~2 DIR_TRANSAD dr_hook dr_hook proc~dir_transad~2->dr_hook mpl_barrier mpl_barrier proc~dir_transad~2->mpl_barrier proc~abort_trans ABORT_TRANS proc~dir_transad~2->proc~abort_trans proc~dir_trans_ctlad DIR_TRANS_CTLAD proc~dir_transad~2->proc~dir_trans_ctlad proc~gstats_nvtx GSTATS_NVTX proc~dir_transad~2->proc~gstats_nvtx proc~set_resol SET_RESOL proc~dir_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 proc~dir_trans_ctlad->proc~abort_trans gstats gstats proc~dir_trans_ctlad->gstats prepare_ftinv prepare_ftinv proc~dir_trans_ctlad->prepare_ftinv proc~ftinv FTINV proc~dir_trans_ctlad->proc~ftinv proc~instantiate_allocator INSTANTIATE_ALLOCATOR proc~dir_trans_ctlad->proc~instantiate_allocator proc~ltdirad LTDIRAD proc~dir_trans_ctlad->proc~ltdirad proc~make_buffered_allocator MAKE_BUFFERED_ALLOCATOR proc~dir_trans_ctlad->proc~make_buffered_allocator proc~prepare_ltdirad PREPARE_LTDIRAD proc~dir_trans_ctlad->proc~prepare_ltdirad proc~prepare_trltog PREPARE_TRLTOG proc~dir_trans_ctlad->proc~prepare_trltog proc~prepare_trltomad PREPARE_TRLTOMAD proc~dir_trans_ctlad->proc~prepare_trltomad proc~prepare_trltomad_pack PREPARE_TRLTOMAD_PACK proc~dir_trans_ctlad->proc~prepare_trltomad_pack proc~prepare_trltomad_unpack PREPARE_TRLTOMAD_UNPACK proc~dir_trans_ctlad->proc~prepare_trltomad_unpack proc~trltog TRLTOG proc~dir_trans_ctlad->proc~trltog proc~trltomad TRLTOMAD proc~dir_trans_ctlad->proc~trltomad proc~trltomad_pack TRLTOMAD_PACK proc~dir_trans_ctlad->proc~trltomad_pack proc~trltomad_unpack TRLTOMAD_UNPACK proc~dir_trans_ctlad->proc~trltomad_unpack proc~gstats_nvtx->gstats proc~set_resol->proc~abort_trans proc~exec_fftw EXEC_FFTW proc~ftinv->proc~exec_fftw proc~reallocate_growing_allocation REALLOCATE_GROWING_ALLOCATION proc~instantiate_allocator->proc~reallocate_growing_allocation proc~ltdirad->dr_hook proc~ltdirad->mpl_barrier proc~ltdirad->proc~gstats_nvtx interface~assign_ptr ASSIGN_PTR proc~ltdirad->interface~assign_ptr ledir_strides ledir_strides proc~ltdirad->ledir_strides proc~get_allocation GET_ALLOCATION proc~ltdirad->proc~get_allocation proc~leinv LEINV proc~ltdirad->proc~leinv proc~updspad UPDSPAD proc~ltdirad->proc~updspad proc~updspbad UPDSPBAD proc~ltdirad->proc~updspbad proc~uvtvdad UVTVDAD proc~ltdirad->proc~uvtvdad proc~prepare_ltdirad->ledir_strides proc~reserve RESERVE proc~prepare_ltdirad->proc~reserve proc~prepare_trltog->proc~reserve proc~prepare_trltomad->proc~reserve proc~prepare_trltomad_pack->proc~reserve proc~prepare_trltomad_unpack->ledir_strides proc~prepare_trltomad_unpack->proc~reserve proc~trltog->dr_hook proc~trltog->mpl_barrier proc~trltog->proc~abort_trans proc~trltog->proc~gstats_nvtx proc~trltog->mpl_abort ext_acc_create ext_acc_create proc~trltog->ext_acc_create ext_acc_delete ext_acc_delete proc~trltog->ext_acc_delete ext_acc_pass ext_acc_pass proc~trltog->ext_acc_pass proc~trltog->interface~assign_ptr mpl_wait mpl_wait proc~trltog->mpl_wait proc~trltog->proc~get_allocation proc~pe2set PE2SET proc~trltog->proc~pe2set proc~trltomad->dr_hook proc~trltomad->mpl_barrier proc~trltomad->proc~abort_trans proc~trltomad->proc~gstats_nvtx proc~trltomad->interface~assign_ptr mpl_myrank mpl_myrank proc~trltomad->mpl_myrank proc~trltomad->proc~get_allocation proc~trltomad_pack->interface~assign_ptr proc~trltomad_pack->proc~get_allocation proc~trltomad_unpack->interface~assign_ptr proc~trltomad_unpack->ledir_strides proc~trltomad_unpack->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~leinv->dr_hook interface~gemm GEMM proc~leinv->interface~gemm proc~mult_butm MULT_BUTM proc~leinv->proc~mult_butm proc~pe2set->proc~abort_trans proc~destroy_growing_allocator DESTROY_GROWING_ALLOCATOR proc~reallocate_growing_allocation->proc~destroy_growing_allocator proc~updspad->proc~updspbad 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