TRLTOG Subroutine

public subroutine TRLTOG(PGLAT, KF_FS, KF_GP, KF_SCALARS_G, KVSET, KPTRGP, PGP, PGPUV, PGP3A, PGP3B, PGP2)

Uses

  • proc~~trltog~~UsesGraph proc~trltog TRLTOG PARKIND1 PARKIND1 proc~trltog->PARKIND1 YOMHOOK YOMHOOK proc~trltog->YOMHOOK module~tpm_distr TPM_DISTR proc~trltog->module~tpm_distr module~tpm_gen TPM_GEN proc~trltog->module~tpm_gen module~tpm_trans TPM_TRANS proc~trltog->module~tpm_trans EC_PARKIND EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_gen->EC_PARKIND module~tpm_trans->PARKIND1

*** *TRLTOG * - head routine for transposition of grid point data from latitudinal to column structure (this takes place between inverse FFT and grid point calculations) TRLTOG is the inverse of TRGTOL

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

Arguments

Type IntentOptional Attributes Name
real(kind=JPRB), intent(in) :: PGLAT(KF_FS,D%NLENGTF)
integer(kind=JPIM), intent(in) :: KF_FS
integer(kind=JPIM), intent(in) :: KF_GP
integer(kind=JPIM), intent(in) :: KF_SCALARS_G
integer(kind=JPIM), intent(in) :: KVSET(KF_GP)
integer(kind=JPIM), intent(in), optional :: KPTRGP(:)
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~~trltog~~CallsGraph proc~trltog TRLTOG dr_hook dr_hook proc~trltog->dr_hook gstats gstats proc~trltog->gstats 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~abort_trans ABORT_TRANS proc~trltog->proc~abort_trans proc~inigptr INIGPTR proc~trltog->proc~inigptr proc~pe2set PE2SET proc~trltog->proc~pe2set 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~inigptr->proc~abort_trans proc~pe2set->proc~abort_trans

Called by

proc~~trltog~~CalledByGraph proc~trltog TRLTOG proc~dir_trans_ctlad~2 DIR_TRANS_CTLAD proc~dir_trans_ctlad~2->proc~trltog proc~eftdir_ctlad EFTDIR_CTLAD proc~eftdir_ctlad->proc~trltog proc~eftinv_ctl EFTINV_CTL proc~eftinv_ctl->proc~trltog proc~ftdir_ctlad FTDIR_CTLAD proc~ftdir_ctlad->proc~trltog proc~ftinv_ctl FTINV_CTL proc~ftinv_ctl->proc~trltog proc~gpnorm_trans_ctlad GPNORM_TRANS_CTLAD proc~gpnorm_trans_ctlad->proc~trltog proc~inv_trans_ctl~2 INV_TRANS_CTL proc~inv_trans_ctl~2->proc~trltog proc~dir_trans_ctlad DIR_TRANS_CTLAD proc~dir_trans_ctlad->proc~ftdir_ctlad proc~edir_trans_ctlad EDIR_TRANS_CTLAD proc~edir_trans_ctlad->proc~eftdir_ctlad proc~einv_trans_ctl EINV_TRANS_CTL proc~einv_trans_ctl->proc~eftinv_ctl proc~gpnorm_transad GPNORM_TRANSAD proc~gpnorm_transad->proc~gpnorm_trans_ctlad proc~inv_trans_ctl INV_TRANS_CTL proc~inv_trans_ctl->proc~ftinv_ctl proc~dir_transad DIR_TRANSAD proc~dir_transad->proc~dir_trans_ctlad proc~dir_transad~2 DIR_TRANSAD proc~dir_transad~2->proc~dir_trans_ctlad proc~edir_transad EDIR_TRANSAD proc~edir_transad->proc~edir_trans_ctlad proc~einv_trans EINV_TRANS proc~einv_trans->proc~einv_trans_ctl proc~inv_trans INV_TRANS proc~inv_trans->proc~inv_trans_ctl proc~inv_trans~2 INV_TRANS proc~inv_trans~2->proc~inv_trans_ctl