CDMAP Subroutine

public subroutine CDMAP(KM, KMLOC, KSL, KSLO, PEPSNM, KDIR, KDGNH, KDGNHD, KFIELDS, PCOEFA, PCOEFS)

Uses

  • proc~~cdmap~~UsesGraph proc~cdmap CDMAP MPL_MODULE MPL_MODULE proc~cdmap->MPL_MODULE YOMHOOK YOMHOOK proc~cdmap->YOMHOOK module~parkind_ectrans PARKIND_ECTRANS proc~cdmap->module~parkind_ectrans module~seefmm_mix~2 seefmm_mix proc~cdmap->module~seefmm_mix~2 module~tpm_distr TPM_DISTR proc~cdmap->module~tpm_distr module~tpm_flt~2 TPM_FLT proc~cdmap->module~tpm_flt~2 PARKIND1 PARKIND1 module~parkind_ectrans->PARKIND1 module~seefmm_mix~2->module~parkind_ectrans ecsort_mix ecsort_mix module~seefmm_mix~2->ecsort_mix module~wts500_mod WTS500_MOD module~seefmm_mix~2->module~wts500_mod EC_PARKIND EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_flt~2->module~parkind_ectrans module~tpm_flt~2->module~seefmm_mix~2

*** CDMAP - REMAP ROOTS

 Purpose.
 --------

remap from one set of roots to another using Christoffel-Darboux formula, see Chien + Alpert, 1997.

  • Interface. ---------- CALL *CDMAP(...)

    1. PERFORM LEGENDRE TRANFORM. --------------------------

!!! fourier buffer setup in output latitudes, may not work if different from input !!!! !!! fourier buffer setup in input data latitudes, may not work if different from output !!!!

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KM
integer(kind=JPIM), intent(in) :: KMLOC
integer(kind=JPIM), intent(in) :: KSL
integer(kind=JPIM), intent(in) :: KSLO
real(kind=JPRBT), intent(in) :: PEPSNM
integer(kind=JPIM), intent(in) :: KDIR
integer(kind=JPIM), intent(in) :: KDGNH
integer(kind=JPIM), intent(in) :: KDGNHD
integer(kind=JPIM), intent(in) :: KFIELDS
real(kind=JPRBT), intent(inout) :: PCOEFA(:,:)
real(kind=JPRBT), intent(inout) :: PCOEFS(:,:)

Calls

proc~~cdmap~~CallsGraph proc~cdmap CDMAP dr_hook dr_hook proc~cdmap->dr_hook mpl_abort mpl_abort proc~cdmap->mpl_abort proc~seefmm_mulm seefmm_mulm proc~cdmap->proc~seefmm_mulm

Called by

proc~~cdmap~~CalledByGraph proc~cdmap CDMAP proc~ltdir~2 LTDIR proc~ltdir~2->proc~cdmap proc~ltinv~2 LTINV proc~ltinv~2->proc~cdmap