n_of_l Function

  1. submodule_scalar_schw_implementation.f90
  2. scalar_schw_implementation
  3. n_of_l

function n_of_l(l)

Calculate the number of m-modes for a given value of l. For the scalar charge in orbit around a Schwarzschild black hole we only need to evolve modes with even due to symmetries.

Arguments

Type IntentOptional AttributesName
integer(kind=ip), intent(in) :: l

The -value.

Return Value integer(kind=ip)

The return value is the number of -modes that is evolved for this .


Called by

proc~~n_of_l~~CalledByGraph proc~n_of_l n_of_l proc~nmodes_of_l nmodes_of_l proc~nmodes_of_l->proc~n_of_l proc~scal_schw_init scal_schw_init proc~scal_schw_init->proc~nmodes_of_l interface~scal_schw_init scal_schw_init interface~scal_schw_init->proc~scal_schw_init

Contents

Source Code

n_of_l

Source Code

  function n_of_l ( l )
  !! Calculate the number of m-modes for a given value of l. For the scalar
  !! charge in orbit around a Schwarzschild black hole we only need to evolve
  !! modes with \(\ell+m\) even due to symmetries.

    implicit none

    integer(ip), intent(in) :: l
    !! The \(\ell\)-value.
    integer(ip) :: n_of_l
    !! The return value is the number of \(m\)-modes that is evolved for this
    !! \(\ell\).

    if ( mod(l,2) == 0 ) then
      n_of_l = ( l + 2 ) / 2
    else
      n_of_l = ( l + 1 ) / 2
    end if
  end function n_of_l