ELTDIRAD Subroutine

public subroutine ELTDIRAD(KM, KMLOC, KF_FS, KF_UV, KF_SCALARS, KLED2, PSPVOR, PSPDIV, PSPSCALAR, PSPSC3A, PSPSC3B, PSPSC2, KFLDPTRUV, KFLDPTRSC, PSPMEANU, PSPMEANV)

Uses

  • proc~~eltdirad~~UsesGraph proc~eltdirad ELTDIRAD PARKIND1 PARKIND1 proc~eltdirad->PARKIND1 YOMHOOK YOMHOOK proc~eltdirad->YOMHOOK module~eledirad_mod ELEDIRAD_MOD proc~eltdirad->module~eledirad_mod module~eprfi2ad_mod EPRFI2AD_MOD proc~eltdirad->module~eprfi2ad_mod module~eupdspad_mod EUPDSPAD_MOD proc~eltdirad->module~eupdspad_mod module~euvtvdad_mod EUVTVDAD_MOD proc~eltdirad->module~euvtvdad_mod module~tpm_dim TPM_DIM proc~eltdirad->module~tpm_dim module~tpmald_dim TPMALD_DIM proc~eltdirad->module~tpmald_dim EC_PARKIND EC_PARKIND module~tpm_dim->EC_PARKIND module~tpmald_dim->PARKIND1

*** ELTDIRAD - Control of Direct Legendre transform step - adjoint

  • Interface. ---------- CALL ELTDIRAD(...)

    1. UPDATE SPECTRAL ARRAYS. -----------------------

    2. COMPUTE VORTICITY AND DIVERGENCE. ---------------------------------

    3. DIRECT LEGENDRE TRANSFORM. --------------------------

    4. FOURIER SPACE COMPUTATIONS. ---------------------------

    5. PREPARE WORK ARRAYS. --------------------

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KM
integer(kind=JPIM), intent(in) :: KMLOC
integer(kind=JPIM), intent(in) :: KF_FS
integer(kind=JPIM), intent(in) :: KF_UV
integer(kind=JPIM), intent(in) :: KF_SCALARS
integer(kind=JPIM), intent(in) :: KLED2
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(:)
real(kind=JPRB), intent(inout), optional :: PSPMEANU(:)
real(kind=JPRB), intent(inout), optional :: PSPMEANV(:)

Calls

proc~~eltdirad~~CallsGraph proc~eltdirad ELTDIRAD dr_hook dr_hook proc~eltdirad->dr_hook proc~eledirad ELEDIRAD proc~eltdirad->proc~eledirad proc~eprfi2ad EPRFI2AD proc~eltdirad->proc~eprfi2ad proc~eupdspad EUPDSPAD proc~eltdirad->proc~eupdspad proc~euvtvdad EUVTVDAD proc~eltdirad->proc~euvtvdad proc~eledirad->dr_hook proc~exec_efftw EXEC_EFFTW proc~eledirad->proc~exec_efftw proc~eprfi2bad EPRFI2BAD proc~eprfi2ad->proc~eprfi2bad proc~eupdspad->dr_hook proc~eupdspbad EUPDSPBAD proc~eupdspad->proc~eupdspbad proc~euvtvdad->dr_hook proc~eprfi2bad->dr_hook foubuf foubuf proc~eprfi2bad->foubuf proc~eupdspbad->dr_hook proc~exec_efftw->dr_hook abor1 abor1 proc~exec_efftw->abor1 dfftw_execute_dft_c2r dfftw_execute_dft_c2r proc~exec_efftw->dfftw_execute_dft_c2r dfftw_execute_dft_r2c dfftw_execute_dft_r2c proc~exec_efftw->dfftw_execute_dft_r2c fftw_alloc_complex fftw_alloc_complex proc~exec_efftw->fftw_alloc_complex fftw_free fftw_free proc~exec_efftw->fftw_free fftwf_alloc_complex fftwf_alloc_complex proc~exec_efftw->fftwf_alloc_complex fftwf_free fftwf_free proc~exec_efftw->fftwf_free proc~create_plan_fftw CREATE_PLAN_FFTW proc~exec_efftw->proc~create_plan_fftw sfftw_execute_dft_c2r sfftw_execute_dft_c2r proc~exec_efftw->sfftw_execute_dft_c2r sfftw_execute_dft_r2c sfftw_execute_dft_r2c proc~exec_efftw->sfftw_execute_dft_r2c proc~create_plan_fftw->dr_hook proc~create_plan_fftw->abor1 proc~create_plan_fftw->fftw_alloc_complex proc~create_plan_fftw->fftw_free proc~create_plan_fftw->fftwf_alloc_complex proc~create_plan_fftw->fftwf_free dfftw_destroy_plan dfftw_destroy_plan proc~create_plan_fftw->dfftw_destroy_plan dfftw_plan_many_dft_c2r dfftw_plan_many_dft_c2r proc~create_plan_fftw->dfftw_plan_many_dft_c2r dfftw_plan_many_dft_r2c dfftw_plan_many_dft_r2c proc~create_plan_fftw->dfftw_plan_many_dft_r2c sfftw_destroy_plan sfftw_destroy_plan proc~create_plan_fftw->sfftw_destroy_plan sfftw_plan_many_dft_c2r sfftw_plan_many_dft_c2r proc~create_plan_fftw->sfftw_plan_many_dft_c2r sfftw_plan_many_dft_r2c sfftw_plan_many_dft_r2c proc~create_plan_fftw->sfftw_plan_many_dft_r2c

Called by

proc~~eltdirad~~CalledByGraph proc~eltdirad ELTDIRAD proc~eltdir_ctlad ELTDIR_CTLAD proc~eltdir_ctlad->proc~eltdirad proc~edir_trans_ctlad EDIR_TRANS_CTLAD proc~edir_trans_ctlad->proc~eltdir_ctlad proc~edir_transad EDIR_TRANSAD proc~edir_transad->proc~edir_trans_ctlad