results Module Source file:results

Classes

Dependencies

Subroutines
  • Free_ClTransfer(CTrans)
  • Free_Limber(CTrans)
  • Init_ClTransfer(CTrans)
    Need to set the Ranges array q before calling this
  • Init_Limber(CTrans, State)
  • init_unit_grid_pade_derivative(n, g)
    • integer intent(in) :: n
    • real(dl) intent(out) :: g(n)
  • interp_window(TimeSteps, RedWin, tau, wing_t, wing2_t, winv_t)
    for evolving sources for reionization we neglect wingtau self-absorption
    • TRanges  :: TimeSteps
    • TRedWin   :: RedWin
    • real(dl)  :: tau
    • real(dl)  :: wing_t
    • real(dl)  :: wing2_t
    • real(dl)  :: winv_t
  • Thermo_table_index(this, tau, i, d)
    Index into the log-spaced thermal history tables, and fractional offset within the step
    • TThermoData intent(in)  :: this
    • real(dl) intent(in) :: tau
    • integer intent(out) :: i
    • real(dl) intent(out) :: d
  • unit_grid_pade_derivative(n, y, g, dy)
    Fits a cubic spline to y and returns dy/di at the grid points.
    • integer intent(in) :: n
    • real(dl) intent(in) :: y(n)
    • real(dl) intent(in) :: g(n)
    • real(dl) intent(out) :: dy(n)
Functions
  • real(dl)
    BAO_D_v_from_DA_H(z, DA, Hz)
    • real(dl) intent(in) :: z
    • real(dl) intent(in) :: DA
    • real(dl) intent(in) :: Hz
  • real(dl)
    cubic_horner(c, d)
    Cubic in d from the pre-computed Horner coefficients
    • real(dl) intent(in) :: c(4)
    • real(dl) intent(in) :: d
  • real(dl)
    ddamping_da(obj, a)
    • class(*)  :: obj
    • real(dl) intent(in) :: a
  • real(dl)
    ddragoptdepth_dz(obj, z)
    • class(*)  :: obj
    • real(dl) intent(in) :: z
  • real(dl)
    dragoptdepth(this, z)
  • real(dl)
    dsound_da_approx(obj, a)
    approximate form used e.g. by CosmoMC for theta
    • class(*)  :: obj
    • real(dl) intent(in) :: a
  • real(dl)
    dsound_da_exact(obj, a)
    • class(*)  :: obj
    • real(dl) intent(in) :: a
  • real(dl)
    dtauda_obj(obj, a)
    obj_function wrapper for passing dtauda to Integrate_Romberg
    • class(*)  :: obj
    • real(dl) intent(in) :: a
  • real(dl)
    dtda(obj, a)
    • class(*)  :: obj
    • real(dl) intent(in) :: a
  • real(dl)
    noreion_doptdepth_dz(obj, z)
    • class(*)  :: obj
    • real(dl) intent(in) :: z
  • real(dl)
    noreion_optdepth(this, z)
  • integer
    open_file_header(filename, col1, Columns, n)
    • character(len=*) intent(in) :: filename
    • character(len=*) intent(in) :: col1
    • character(len=name_tag_len) intent(in) :: Columns(:)
    • integer intent(in), optional :: n
  • real(dl)
    reion_doptdepth_dz(obj, z)
    • class(*)  :: obj
    • real(dl) intent(in) :: z
  • character(len=5)
    scalar_fieldname(i)
    • integer intent(in) :: i
  • real(dl)
    state_function(obj, a)
  • integer
    Win_Limber_ell(W, CP, lmax)
  • real(dl)
    WindowKmaxForL(CP, W, ell)