UPDSPAD Subroutine

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

Uses

  • proc~~updspad~~UsesGraph proc~updspad UPDSPAD PARKIND1 PARKIND1 proc~updspad->PARKIND1 module~tpm_dim TPM_DIM proc~updspad->module~tpm_dim module~tpm_distr TPM_DISTR proc~updspad->module~tpm_distr module~tpm_trans TPM_TRANS proc~updspad->module~tpm_trans module~updspbad_mod UPDSPBAD_MOD proc~updspad->module~updspbad_mod EC_PARKIND EC_PARKIND module~tpm_dim->EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_trans->PARKIND1

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

  • Interface. ---------- CALL UPDSPAD(...)

    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(out) :: POA1(:,:)
real(kind=JPRB), intent(out) :: POA2(:,:)
real(kind=JPRB), intent(inout), optional :: PSPVOR(:,:)
real(kind=JPRB), intent(inout), optional :: PSPDIV(:,:)
real(kind=JPRB), intent(inout), optional :: PSPSCALAR(:,:)
real(kind=JPRB), intent(inout), optional :: PSPSC3A(:,:,:)
real(kind=JPRB), intent(inout), optional :: PSPSC3B(:,:,:)
real(kind=JPRB), intent(inout), optional :: PSPSC2(:,:)
integer(kind=JPIM), intent(in), optional :: KFLDPTRUV(:)
integer(kind=JPIM), intent(in), optional :: KFLDPTRSC(:)

Calls

proc~~updspad~~CallsGraph proc~updspad UPDSPAD proc~updspbad UPDSPBAD proc~updspad->proc~updspbad

Called by

proc~~updspad~~CalledByGraph proc~updspad UPDSPAD proc~ltdirad LTDIRAD proc~ltdirad->proc~updspad proc~ltdirad~2 LTDIRAD proc~ltdirad~2->proc~updspad proc~dir_trans_ctlad~2 DIR_TRANS_CTLAD proc~dir_trans_ctlad~2->proc~ltdirad proc~ltdir_ctlad LTDIR_CTLAD proc~ltdir_ctlad->proc~ltdirad proc~dir_trans_ctlad DIR_TRANS_CTLAD proc~dir_trans_ctlad->proc~ltdir_ctlad proc~dir_transad DIR_TRANSAD proc~dir_transad->proc~dir_trans_ctlad proc~dir_transad~2 DIR_TRANSAD proc~dir_transad~2->proc~dir_trans_ctlad