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~2 READ_LEGPOL_MOD proc~suleg~2->module~read_legpol_mod~2 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 SUTRLE_MOD proc~suleg~2->module~sutrle_mod module~tpm_constants TPM_CONSTANTS proc~suleg~2->module~tpm_constants module~tpm_ctl TPM_CTL proc~suleg~2->module~tpm_ctl 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 TPM_FIELDS proc~suleg~2->module~tpm_fields module~tpm_flt~2 TPM_FLT proc~suleg~2->module~tpm_flt~2 module~tpm_gen TPM_GEN proc~suleg~2->module~tpm_gen module~tpm_geometry TPM_GEOMETRY proc~suleg~2->module~tpm_geometry 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 WTS500_MOD module~seefmm_mix~2->module~wts500_mod EC_PARKIND EC_PARKIND module~tpm_constants->EC_PARKIND module~tpm_ctl->module~sharedmem_mod module~tpm_dim->EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_fields->EC_PARKIND module~tpm_flt~2->module~seefmm_mix~2 module~tpm_flt~2->module~parkind_ectrans module~tpm_gen->EC_PARKIND module~tpm_geometry->EC_PARKIND module~tpm_pol->EC_PARKIND module~ectrans_blas_mod->EC_PARKIND module~interpol_decomp_mod->EC_PARKIND module~parkind_ectrans->PARKIND1 iso_c_binding iso_c_binding 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 keysort keysort proc~setup_seefmm->keysort proc~wts500 WTS500 proc~setup_seefmm->proc~wts500 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 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->abor1 dlarf dlarf proc~alg541->dlarf proc~alg511 ALG511 proc~alg541->proc~alg511