EFSC Subroutine

public subroutine EFSC(KGL, KF_UV, KF_SCALARS, KF_SCDERS, PUV, PSCALAR, PNSDERS, PEWDERS, PUVDERS)

Uses

  • proc~~efsc~~UsesGraph proc~efsc EFSC PARKIND1 PARKIND1 proc~efsc->PARKIND1 YOMHOOK YOMHOOK proc~efsc->YOMHOOK module~tpm_distr TPM_DISTR proc~efsc->module~tpm_distr module~tpm_geometry TPM_GEOMETRY proc~efsc->module~tpm_geometry module~tpm_trans TPM_TRANS proc~efsc->module~tpm_trans module~tpmald_geo TPMALD_GEO proc~efsc->module~tpmald_geo EC_PARKIND EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_geometry->EC_PARKIND module~tpm_trans->PARKIND1 module~tpmald_geo->PARKIND1

*** FSC - Division by acos(theta), east-west derivatives

  • Interface. ---------- CALL FSC(..) Explicit arguments : PUV - u and v -------------------- PSCALAR - scalar valued varaibles PNSDERS - N-S derivative of S.V.V. PEWDERS - E-W derivative of S.V.V. PUVDERS - E-W derivative of u and v Method. -------

       EAST-WEST DERIVATIVES
      ---------------------

    2.1 U AND V.

    2.2 SCALAR VARIABLES

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KGL
integer(kind=JPIM), intent(in) :: KF_UV
integer(kind=JPIM), intent(in) :: KF_SCALARS
integer(kind=JPIM), intent(in) :: KF_SCDERS
real(kind=JPRB), intent(inout) :: PUV(:,:)
real(kind=JPRB), intent(in) :: PSCALAR(:,:)
real(kind=JPRB), intent(inout) :: PNSDERS(:,:)
real(kind=JPRB), intent(out) :: PEWDERS(:,:)
real(kind=JPRB), intent(out) :: PUVDERS(:,:)

Calls

proc~~efsc~~CallsGraph proc~efsc EFSC dr_hook dr_hook proc~efsc->dr_hook

Called by

proc~~efsc~~CalledByGraph proc~efsc EFSC proc~eftinv_ctl EFTINV_CTL proc~eftinv_ctl->proc~efsc proc~einv_trans_ctl EINV_TRANS_CTL proc~einv_trans_ctl->proc~eftinv_ctl proc~einv_trans EINV_TRANS proc~einv_trans->proc~einv_trans_ctl