SUTRLE Subroutine

public subroutine SUTRLE(PNM, KGL, KLOOP)

Uses

  • proc~~sutrle~2~~UsesGraph proc~sutrle~2 SUTRLE EC_PARKIND EC_PARKIND proc~sutrle~2->EC_PARKIND MPL_MODULE MPL_MODULE proc~sutrle~2->MPL_MODULE module~abort_trans_mod ABORT_TRANS_MOD proc~sutrle~2->module~abort_trans_mod module~set2pe_mod SET2PE_MOD proc~sutrle~2->module~set2pe_mod module~tpm_dim TPM_DIM proc~sutrle~2->module~tpm_dim module~tpm_distr TPM_DISTR proc~sutrle~2->module~tpm_distr module~tpm_fields~2 TPM_FIELDS proc~sutrle~2->module~tpm_fields~2 PARKIND1 PARKIND1 module~tpm_dim->PARKIND1 module~tpm_distr->EC_PARKIND iso_c_binding iso_c_binding module~tpm_fields~2->iso_c_binding module~parkind_ectrans PARKIND_ECTRANS module~tpm_fields~2->module~parkind_ectrans module~parkind_ectrans->PARKIND1

*** *sutrle * - transposition of Legendre polynomials during set-up

  • Interface. ---------- call *sutrle(pnm)

    Calculate send buffer size

copy data to be sent into zsndbufv

copy data from buffer to f%rpnm copy data from pnm to rpnm

 Calculate send buffer size

copy data to be sent into zsndbufw receive message (if not empty)

copy data from buffer to f%rpnm

Arguments

Type IntentOptional Attributes Name
real(kind=JPRD), intent(in) :: PNM(:)
integer(kind=JPIM), intent(in) :: KGL
integer(kind=JPIM), intent(in) :: KLOOP

Calls

proc~~sutrle~2~~CallsGraph proc~sutrle~2 SUTRLE gstats gstats proc~sutrle~2->gstats mpl_allreduce mpl_allreduce proc~sutrle~2->mpl_allreduce mpl_barrier mpl_barrier proc~sutrle~2->mpl_barrier mpl_recv mpl_recv proc~sutrle~2->mpl_recv mpl_send mpl_send proc~sutrle~2->mpl_send mpl_wait mpl_wait proc~sutrle~2->mpl_wait proc~set2pe SET2PE proc~sutrle~2->proc~set2pe abor1 abor1 proc~set2pe->abor1 proc~abort_trans ABORT_TRANS proc~set2pe->proc~abort_trans 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