TRGTOL Subroutine

public subroutine TRGTOL(ALLOCATOR, HTRGTOL, PREEL_REAL, KF_FS, KF_GP, KF_UV_G, KF_SCALARS_G, PGP, PGPUV, PGP3A, PGP3B, PGP2, KPTRGP, KVSETUV, KVSETSC, KVSETSC3A, KVSETSC3B, KVSETSC2)

Uses

  • proc~~trgtol~~UsesGraph proc~trgtol TRGTOL MPL_DATA_MODULE MPL_DATA_MODULE proc~trgtol->MPL_DATA_MODULE MPL_MODULE MPL_MODULE proc~trgtol->MPL_MODULE OML_MOD OML_MOD proc~trgtol->OML_MOD OPENACC_EXT OPENACC_EXT proc~trgtol->OPENACC_EXT YOMHOOK YOMHOOK proc~trgtol->YOMHOOK iso_c_binding iso_c_binding proc~trgtol->iso_c_binding module~abort_trans_mod ABORT_TRANS_MOD proc~trgtol->module~abort_trans_mod module~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD proc~trgtol->module~buffered_allocator_mod module~eq_regions_mod eq_regions_mod proc~trgtol->module~eq_regions_mod module~parkind_ectrans PARKIND_ECTRANS proc~trgtol->module~parkind_ectrans module~pe2set_mod PE2SET_MOD proc~trgtol->module~pe2set_mod module~tpm_distr TPM_DISTR proc~trgtol->module~tpm_distr module~tpm_gen TPM_GEN proc~trgtol->module~tpm_gen module~tpm_stats TPM_STATS proc~trgtol->module~tpm_stats module~tpm_trans TPM_TRANS proc~trgtol->module~tpm_trans module~buffered_allocator_mod->iso_c_binding module~buffered_allocator_mod->module~abort_trans_mod EC_PARKIND EC_PARKIND module~buffered_allocator_mod->EC_PARKIND module~growing_allocator_mod GROWING_ALLOCATOR_MOD module~buffered_allocator_mod->module~growing_allocator_mod module~eq_regions_mod->EC_PARKIND PARKIND1 PARKIND1 module~parkind_ectrans->PARKIND1 module~tpm_distr->EC_PARKIND module~tpm_gen->EC_PARKIND module~tpm_trans->PARKIND1 module~growing_allocator_mod->iso_c_binding

*** *TRGTOL * - transposition of grid point data from column structure to latitudinal. Reorganize data between grid point calculations and direct Fourier Transform

  • Interface. ---------- call *trgtol(...)

CALL ASSIGN_PTR(PREEL_REAL, GET_ALLOCATION(ALLOCATOR, HTRGTOL%HCOMBUFR_AND_REEL), size1, size2)

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(in) :: ALLOCATOR
type(TRGTOL_HANDLE), intent(in) :: HTRGTOL
real(kind=JPRBT), intent(out), POINTER :: PREEL_REAL(:)
integer(kind=JPIM), intent(in) :: KF_FS
integer(kind=JPIM), intent(in) :: KF_GP
integer(kind=JPIM), intent(in) :: KF_UV_G
integer(kind=JPIM), intent(in) :: KF_SCALARS_G
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(:,:,:)
integer(kind=JPIM), intent(in), optional :: KPTRGP(:)
integer(kind=JPIM), intent(in), optional :: KVSETUV(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC3A(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC3B(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC2(:)

Calls

proc~~trgtol~~CallsGraph proc~trgtol TRGTOL dr_hook dr_hook proc~trgtol->dr_hook 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 interface~assign_ptr ASSIGN_PTR proc~trgtol->interface~assign_ptr mpl_abort mpl_abort proc~trgtol->mpl_abort mpl_barrier mpl_barrier proc~trgtol->mpl_barrier mpl_wait mpl_wait proc~trgtol->mpl_wait proc~abort_trans ABORT_TRANS proc~trgtol->proc~abort_trans proc~get_allocation GET_ALLOCATION proc~trgtol->proc~get_allocation proc~gstats_nvtx GSTATS_NVTX proc~trgtol->proc~gstats_nvtx proc~pe2set PE2SET proc~trgtol->proc~pe2set proc~abort_trans->mpl_abort sdl_srlabort sdl_srlabort proc~abort_trans->sdl_srlabort sdl_traceback sdl_traceback proc~abort_trans->sdl_traceback proc~get_allocation->proc~abort_trans gstats gstats proc~gstats_nvtx->gstats proc~pe2set->proc~abort_trans

Called by

proc~~trgtol~~CalledByGraph proc~trgtol TRGTOL proc~dir_trans_ctl~2 DIR_TRANS_CTL proc~dir_trans_ctl~2->proc~trgtol proc~eftdir_ctl EFTDIR_CTL proc~eftdir_ctl->proc~trgtol proc~eftinv_ctlad EFTINV_CTLAD proc~eftinv_ctlad->proc~trgtol proc~ftdir_ctl FTDIR_CTL proc~ftdir_ctl->proc~trgtol proc~ftinv_ctlad FTINV_CTLAD proc~ftinv_ctlad->proc~trgtol proc~gpnorm_trans_ctl GPNORM_TRANS_CTL proc~gpnorm_trans_ctl->proc~trgtol proc~gpnorm_trans_ctltl GPNORM_TRANS_CTLTL proc~gpnorm_trans_ctltl->proc~trgtol proc~gpnorm_trans~2 GPNORM_TRANS proc~gpnorm_trans~2->proc~trgtol proc~inv_trans_ctlad INV_TRANS_CTLAD proc~inv_trans_ctlad->proc~trgtol proc~dir_trans_ctl DIR_TRANS_CTL proc~dir_trans_ctl->proc~ftdir_ctl proc~edir_trans_ctl EDIR_TRANS_CTL proc~edir_trans_ctl->proc~eftdir_ctl proc~egpnorm_trans EGPNORM_TRANS proc~egpnorm_trans->proc~gpnorm_trans_ctl proc~einv_trans_ctlad EINV_TRANS_CTLAD proc~einv_trans_ctlad->proc~eftinv_ctlad proc~gpnorm_trans GPNORM_TRANS proc~gpnorm_trans->proc~gpnorm_trans_ctl proc~gpnorm_transtl~2 GPNORM_TRANSTL proc~gpnorm_transtl~2->proc~gpnorm_trans_ctltl proc~inv_trans_ctlad~2 INV_TRANS_CTLAD proc~inv_trans_ctlad~2->proc~ftinv_ctlad proc~inv_transad INV_TRANSAD proc~inv_transad->proc~inv_trans_ctlad proc~inv_transad~2 INV_TRANSAD proc~inv_transad~2->proc~inv_trans_ctlad proc~dir_trans DIR_TRANS proc~dir_trans->proc~dir_trans_ctl proc~dir_trans~2 DIR_TRANS proc~dir_trans~2->proc~dir_trans_ctl proc~edir_trans EDIR_TRANS proc~edir_trans->proc~edir_trans_ctl proc~einv_transad EINV_TRANSAD proc~einv_transad->proc~einv_trans_ctlad