CDMAP Subroutine

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

Uses

  • proc~~cdmap~~UsesGraph proc~cdmap CDMAP PARKIND1 PARKIND1 proc~cdmap->PARKIND1 YOMHOOK YOMHOOK proc~cdmap->YOMHOOK module~seefmm_mix seefmm_mix proc~cdmap->module~seefmm_mix module~tpm_distr TPM_DISTR proc~cdmap->module~tpm_distr module~tpm_flt TPM_FLT proc~cdmap->module~tpm_flt module~tpm_trans TPM_TRANS proc~cdmap->module~tpm_trans ecsort_mix ecsort_mix module~seefmm_mix->ecsort_mix module~wts500_mod WTS500_MOD module~seefmm_mix->module~wts500_mod parkind1 parkind1 module~seefmm_mix->parkind1 EC_PARKIND EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_flt->PARKIND1 module~tpm_flt->module~seefmm_mix module~butterfly_alg_mod BUTTERFLY_ALG_MOD module~tpm_flt->module~butterfly_alg_mod module~tpm_trans->PARKIND1 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 module~ectrans_blas_mod->EC_PARKIND module~interpol_decomp_mod->EC_PARKIND iso_c_binding iso_c_binding module~sharedmem_mod->iso_c_binding

*** CDMAP - REMAP ROOTS

 Purpose.
 --------

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

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

!!! 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=JPRB), 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=JPRB), intent(inout) :: PCOEFA(:,:)
real(kind=JPRB), intent(inout) :: PCOEFS(:,:)

Calls

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

Called by

proc~~cdmap~~CalledByGraph proc~cdmap CDMAP proc~ltdir LTDIR proc~ltdir->proc~cdmap proc~ltinv LTINV proc~ltinv->proc~cdmap proc~dir_trans_ctl~2 DIR_TRANS_CTL proc~dir_trans_ctl~2->proc~ltdir proc~inv_trans_ctl~2 INV_TRANS_CTL proc~inv_trans_ctl~2->proc~ltinv proc~ltdir_ctl LTDIR_CTL proc~ltdir_ctl->proc~ltdir proc~ltinv_ctl LTINV_CTL proc~ltinv_ctl->proc~ltinv proc~dir_trans_ctl DIR_TRANS_CTL proc~dir_trans_ctl->proc~ltdir_ctl proc~inv_trans_ctl INV_TRANS_CTL proc~inv_trans_ctl->proc~ltinv_ctl proc~dir_trans DIR_TRANS proc~dir_trans->proc~dir_trans_ctl proc~dir_trans~2 DIR_TRANS proc~dir_trans~2->proc~dir_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