SULEG Subroutine

public subroutine SULEG()

Uses

  • proc~~suleg~2~~UsesGraph proc~suleg~2 SULEG MPL_MODULE MPL_MODULE proc~suleg~2->MPL_MODULE PARKIND1 PARKIND1 proc~suleg~2->PARKIND1 PARKIND2 PARKIND2 proc~suleg~2->PARKIND2 module~abort_trans_mod ABORT_TRANS_MOD proc~suleg~2->module~abort_trans_mod module~butterfly_alg_mod BUTTERFLY_ALG_MOD proc~suleg~2->module~butterfly_alg_mod module~pre_suleg_mod PRE_SULEG_MOD proc~suleg~2->module~pre_suleg_mod module~prepsnm_mod~2 PREPSNM_MOD proc~suleg~2->module~prepsnm_mod~2 module~read_legpol_mod READ_LEGPOL_MOD proc~suleg~2->module~read_legpol_mod module~seefmm_mix~2 seefmm_mix proc~suleg~2->module~seefmm_mix~2 module~set2pe_mod SET2PE_MOD proc~suleg~2->module~set2pe_mod module~setup_geom_mod SETUP_GEOM_MOD proc~suleg~2->module~setup_geom_mod module~sugaw_mod SUGAW_MOD proc~suleg~2->module~sugaw_mod module~supol_mod SUPOL_MOD proc~suleg~2->module~supol_mod module~supolf_mod SUPOLF_MOD proc~suleg~2->module~supolf_mod module~sutrle_mod~2 SUTRLE_MOD proc~suleg~2->module~sutrle_mod~2 module~tpm_constants~2 TPM_CONSTANTS proc~suleg~2->module~tpm_constants~2 module~tpm_ctl~2 TPM_CTL proc~suleg~2->module~tpm_ctl~2 module~tpm_dim TPM_DIM proc~suleg~2->module~tpm_dim module~tpm_distr TPM_DISTR proc~suleg~2->module~tpm_distr module~tpm_fields~2 TPM_FIELDS proc~suleg~2->module~tpm_fields~2 module~tpm_flt~2 TPM_FLT proc~suleg~2->module~tpm_flt~2 module~tpm_gen~2 TPM_GEN proc~suleg~2->module~tpm_gen~2 module~tpm_geometry~2 TPM_GEOMETRY proc~suleg~2->module~tpm_geometry~2 module~tpm_pol TPM_POL proc~suleg~2->module~tpm_pol module~write_legpol_mod~2 WRITE_LEGPOL_MOD proc~suleg~2->module~write_legpol_mod~2 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 ecsort_mix ecsort_mix module~seefmm_mix~2->ecsort_mix module~parkind_ectrans PARKIND_ECTRANS module~seefmm_mix~2->module~parkind_ectrans module~wts500_mod~2 WTS500_MOD module~seefmm_mix~2->module~wts500_mod~2 module~tpm_constants~2->module~parkind_ectrans module~tpm_ctl~2->PARKIND1 iso_c_binding iso_c_binding module~tpm_ctl~2->iso_c_binding module~tpm_ctl~2->module~sharedmem_mod module~tpm_dim->PARKIND1 EC_PARKIND EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_fields~2->iso_c_binding module~tpm_fields~2->module~parkind_ectrans module~tpm_flt~2->module~seefmm_mix~2 module~tpm_flt~2->module~parkind_ectrans module~tpm_gen~2->module~parkind_ectrans module~tpm_geometry~2->module~parkind_ectrans module~tpm_pol->EC_PARKIND module~ectrans_blas_mod->EC_PARKIND module~interpol_decomp_mod->EC_PARKIND module~parkind_ectrans->PARKIND1 module~sharedmem_mod->iso_c_binding

*** *SULEG * - initialize the Legendre polynomials

  • Interface. ---------- CALL SULEG

    1.0 Initialize Fourier coefficients for ordinary Legendre polynomials

    3.1 Gaussian latitudes and weights

    3.1.1 specify a dual set of output (inv_trans) or input (dir_trans) latitudes / longitudes

    3.2 Computes related arrays

    3.2 Computes related arrays

    3.3 Working arrays

$ IF( S%LUSEFLT.AND.LMPOFF ) THEN $ CALL ABORT_TRANS('SULEG: LUSEFLT=T and LMPOFF=T not supported') $ ENDIF

Arguments

None

Calls

proc~~suleg~2~~CallsGraph proc~suleg~2 SULEG gstats gstats proc~suleg~2->gstats mpl_barrier mpl_barrier proc~suleg~2->mpl_barrier mpl_bytes mpl_bytes proc~suleg~2->mpl_bytes mpl_recv mpl_recv proc~suleg~2->mpl_recv mpl_send mpl_send proc~suleg~2->mpl_send mpl_wait mpl_wait proc~suleg~2->mpl_wait proc~abort_trans ABORT_TRANS proc~suleg~2->proc~abort_trans proc~construct_butterfly CONSTRUCT_BUTTERFLY proc~suleg~2->proc~construct_butterfly proc~end_pol END_POL proc~suleg~2->proc~end_pol proc~ini_pol INI_POL proc~suleg~2->proc~ini_pol proc~pack_butterfly_struct PACK_BUTTERFLY_STRUCT proc~suleg~2->proc~pack_butterfly_struct proc~pre_suleg PRE_SULEG proc~suleg~2->proc~pre_suleg proc~prepsnm PREPSNM proc~suleg~2->proc~prepsnm proc~read_legpol READ_LEGPOL proc~suleg~2->proc~read_legpol proc~set2pe SET2PE proc~suleg~2->proc~set2pe proc~setup_geom SETUP_GEOM proc~suleg~2->proc~setup_geom proc~setup_seefmm setup_seefmm proc~suleg~2->proc~setup_seefmm proc~sugaw SUGAW proc~suleg~2->proc~sugaw proc~supol SUPOL proc~suleg~2->proc~supol proc~supolf SUPOLF proc~suleg~2->proc~supolf proc~sutrle SUTRLE proc~suleg~2->proc~sutrle proc~unpack_butterfly_struct UNPACK_BUTTERFLY_STRUCT proc~suleg~2->proc~unpack_butterfly_struct proc~write_legpol WRITE_LEGPOL proc~suleg~2->proc~write_legpol 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~construct_butterfly->gstats proc~compute_id COMPUTE_ID proc~construct_butterfly->proc~compute_id abor1 abor1 proc~pack_butterfly_struct->abor1 proc~read_legpol->proc~abort_trans bytes_io_close bytes_io_close proc~read_legpol->bytes_io_close bytes_io_open bytes_io_open proc~read_legpol->bytes_io_open bytes_io_read bytes_io_read proc~read_legpol->bytes_io_read interface~sharedmem_associate SHAREDMEM_ASSOCIATE proc~read_legpol->interface~sharedmem_associate proc~set2pe->proc~abort_trans proc~set2pe->abor1 proc~comb_xy comb_xy proc~setup_seefmm->proc~comb_xy proc~prepotf prepotf proc~setup_seefmm->proc~prepotf proc~suquad suquad proc~setup_seefmm->proc~suquad proc~sugaw->gstats proc~sugaw->proc~abort_trans proc~sugaw->proc~supolf proc~gawl GAWL proc~sugaw->proc~gawl proc~sutrle->gstats proc~sutrle->mpl_barrier proc~sutrle->mpl_recv proc~sutrle->mpl_send proc~sutrle->mpl_wait proc~sutrle->proc~set2pe mpl_allreduce mpl_allreduce proc~sutrle->mpl_allreduce proc~unpack_butterfly_struct->abor1 proc~unpack_butterfly_struct->interface~sharedmem_associate proc~write_legpol->proc~abort_trans proc~write_legpol->bytes_io_close proc~write_legpol->bytes_io_open bytes_io_write bytes_io_write proc~write_legpol->bytes_io_write keysort keysort proc~comb_xy->keysort proc~compute_id->abor1 dtrsm dtrsm proc~compute_id->dtrsm proc~alg541 ALG541 proc~compute_id->proc~alg541 proc~cpledn CPLEDN proc~gawl->proc~cpledn proc~wts500 WTS500 proc~suquad->proc~wts500 dlarf dlarf proc~alg541->dlarf proc~alg511 ALG511 proc~alg541->proc~alg511 proc~wts500->abor1