VSH_TOR_ALL_DP Subroutine

private subroutine VSH_TOR_ALL_DP(OUT, LMAX, THETA, PHI)

All toroidal standard-VSH members VSH_TOR for . Identical to PVSH_TOR_ALL (thin wrapper) -- the toroidal member is common to both bases.

Warning

Inherits ASSOC_LEGENDRE_NORM_ALL's -dependent stability limit (safe for unconditionally) -- see STABILITY_FINDINGS.md at the repo root.

1= (always 0), 2=, 3=; mode axis indexed by YLM_INDEX(l,m).

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(out) :: OUT(3,(LMAX+1)**2)
integer(kind=i4), intent(in) :: LMAX

Maximum degree, .
real(kind=dp), intent(in) :: THETA

Colatitude in radians, .
real(kind=dp), intent(in) :: PHI

Longitude in radians, .

Calls

proc~~vsh_tor_all_dp~~CallsGraph proc~vsh_tor_all_dp VSH_TOR_ALL_DP interface~pvsh_tor_all PVSH_TOR_ALL proc~vsh_tor_all_dp->interface~pvsh_tor_all proc~pvsh_tor_all_dp PVSH_TOR_ALL_DP interface~pvsh_tor_all->proc~pvsh_tor_all_dp interface~vsh_core VSH_CORE proc~pvsh_tor_all_dp->interface~vsh_core proc~ylm_index YLM_INDEX proc~pvsh_tor_all_dp->proc~ylm_index proc~vsh_core_dp VSH_CORE_DP interface~vsh_core->proc~vsh_core_dp proc~vsh_core_dp->proc~ylm_index dcos dcos proc~vsh_core_dp->dcos dsin dsin proc~vsh_core_dp->dsin interface~assoc_legendre_norm_all ASSOC_LEGENDRE_NORM_ALL proc~vsh_core_dp->interface~assoc_legendre_norm_all interface~ddx_assoc_legendre_norm_all DDX_ASSOC_LEGENDRE_NORM_ALL proc~vsh_core_dp->interface~ddx_assoc_legendre_norm_all proc~plm_index PLM_INDEX proc~vsh_core_dp->proc~plm_index proc~assoc_legendre_norm_all_dp ASSOC_LEGENDRE_NORM_ALL_DP interface~assoc_legendre_norm_all->proc~assoc_legendre_norm_all_dp proc~ddx_assoc_legendre_norm_all_dp DDX_ASSOC_LEGENDRE_NORM_ALL_DP interface~ddx_assoc_legendre_norm_all->proc~ddx_assoc_legendre_norm_all_dp proc~assoc_legendre_norm_all_dp->proc~plm_index proc~ddx_assoc_legendre_norm_all_dp->proc~plm_index

Called by

proc~~vsh_tor_all_dp~~CalledByGraph proc~vsh_tor_all_dp VSH_TOR_ALL_DP interface~vsh_tor_all VSH_TOR_ALL interface~vsh_tor_all->proc~vsh_tor_all_dp proc~batch_vsh_tor_cons BATCH_VSH_TOR_CONS proc~batch_vsh_tor_cons->interface~vsh_tor_all proc~bench_vsh_tor BENCH_VSH_TOR proc~bench_vsh_tor->interface~vsh_tor_all program~convergence_main CONVERGENCE_MAIN program~convergence_main->interface~vsh_tor_all program~convergence_main->proc~batch_vsh_tor_cons program~bench_main BENCH_MAIN program~bench_main->proc~bench_vsh_tor program~main MAIN program~main->proc~batch_vsh_tor_cons

Source Code

  SUBROUTINE VSH_TOR_ALL_DP(OUT, LMAX, THETA, PHI)
  IMPLICIT NONE
  INTEGER(KIND=i4), INTENT(IN)  :: LMAX
  REAL(KIND=dp),    INTENT(IN)  :: THETA
  REAL(KIND=dp),    INTENT(IN)  :: PHI
  COMPLEX(KIND=dp), INTENT(OUT) :: OUT(3,(LMAX+1)**2)
  CALL PVSH_TOR_ALL(OUT, LMAX, THETA, PHI)
  END SUBROUTINE VSH_TOR_ALL_DP