UPDSP Subroutine

public subroutine UPDSP(KM, KF_UV, KF_SCALARS, POA1, POA2, PSPVOR, PSPDIV, PSPSCALAR, PSPSC3A, PSPSC3B, PSPSC2, KFLDPTRUV, KFLDPTRSC)

Uses

  • proc~~updsp~2~~UsesGraph proc~updsp~2 UPDSP PARKIND1 PARKIND1 proc~updsp~2->PARKIND1 module~tpm_distr TPM_DISTR proc~updsp~2->module~tpm_distr module~tpm_trans~2 TPM_TRANS proc~updsp~2->module~tpm_trans~2 module~updspb_mod UPDSPB_MOD proc~updsp~2->module~updspb_mod EC_PARKIND EC_PARKIND module~tpm_distr->EC_PARKIND iso_c_binding iso_c_binding module~tpm_trans~2->iso_c_binding module~growing_allocator_mod GROWING_ALLOCATOR_MOD module~tpm_trans~2->module~growing_allocator_mod module~parkind_ectrans PARKIND_ECTRANS module~tpm_trans~2->module~parkind_ectrans module~growing_allocator_mod->iso_c_binding module~parkind_ectrans->PARKIND1

*** UPDSP - Update spectral arrays after direct Legendre transform

  • Interface. ---------- CALL UPDSP(...)

    1.2 SCALARS

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KM
integer(kind=JPIM), intent(in) :: KF_UV
integer(kind=JPIM), intent(in) :: KF_SCALARS
real(kind=JPRB), intent(in) :: POA1(:,:)
real(kind=JPRB), intent(in) :: POA2(:,:)
real(kind=JPRB), intent(out), optional :: PSPVOR(:,:)
real(kind=JPRB), intent(out), optional :: PSPDIV(:,:)
real(kind=JPRB), intent(out), optional :: PSPSCALAR(:,:)
real(kind=JPRB), intent(out), optional :: PSPSC3A(:,:,:)
real(kind=JPRB), intent(out), optional :: PSPSC3B(:,:,:)
real(kind=JPRB), intent(out), optional :: PSPSC2(:,:)
integer(kind=JPIM), intent(in), optional :: KFLDPTRUV(:)
integer(kind=JPIM), intent(in), optional :: KFLDPTRSC(:)

Calls

proc~~updsp~2~~CallsGraph proc~updsp~2 UPDSP proc~updspb UPDSPB proc~updsp~2->proc~updspb