linescaling.h

Go to the documentation of this file.

/* Copyright (C) 2015
   Richard Larsson <ric.larsson@gmail.com>

   This program is free software; you can redistribute it and/or modify it
   under the terms of the GNU General Public License as published by the
   Free Software Foundation; either version 2, or (at your option) any
   later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
   USA. */

#ifndef linescaling_h
#define linescaling_h

#include "absorption.h"
#include "constants.h"

Numeric single_partition_function(const Numeric& T,
                                  const SpeciesAuxData::AuxType& partition_type,
                                  const ArrayOfGriddedField1& partition_data);

Numeric dsingle_partition_function_dT(
    const Numeric& QT,
    const Numeric& T,
    const Numeric& dT,
    const SpeciesAuxData::AuxType& partition_type,
    const ArrayOfGriddedField1& partition_data);

Numeric stimulated_emission(Numeric T, Numeric F0);

Numeric dstimulated_emissiondT(Numeric T, Numeric F0);

Numeric dstimulated_emissiondF0(Numeric T, Numeric F0);

Numeric stimulated_relative_emission(const Numeric& gamma,
                                     const Numeric& gamma_ref);

Numeric dstimulated_relative_emission_dT(const Numeric& gamma,
                                         const Numeric& gamma_ref,
                                         const Numeric& F0,
                                         const Numeric& T);

Numeric dstimulated_relative_emission_dF0(const Numeric& gamma,
                                          const Numeric& gamma_ref,
                                          const Numeric& T,
                                          const Numeric& T0);

Numeric boltzman_ratio(const Numeric& T, const Numeric& T0, const Numeric& E0);

Numeric dboltzman_ratio_dT(const Numeric& boltzmann_ratio,
                           const Numeric& T,
                           const Numeric& E0);

constexpr Numeric dboltzman_ratio_dT_div_boltzmann_ratio(Numeric T,
                                                         Numeric E0)
{
  return E0 / (Constant::k * T * T);
}

Numeric boltzman_factor(Numeric T, Numeric E0);

Numeric dboltzman_factordT(Numeric T, Numeric E0);

Numeric dboltzman_factordE0(Numeric T, Numeric E0);

Numeric absorption_nlte_ratio(const Numeric& gamma,
                              const Numeric& r_upp = 1.0,
                              const Numeric& r_low = 1.0);

Numeric dabsorption_nlte_rate_dT(const Numeric& gamma,
                                 const Numeric& T,
                                 const Numeric& F0,
                                 const Numeric& El,
                                 const Numeric& Eu,
                                 const Numeric& r_upp = 1.0,
                                 const Numeric& r_low = 1.0);

Numeric dabsorption_nlte_rate_dF0(const Numeric& gamma,
                                  const Numeric& T,
                                  const Numeric& r_upp = 1.0,
                                  const Numeric& r_low = 1.0);

Numeric dabsorption_nlte_rate_dTl(const Numeric& gamma,
                                  const Numeric& T,
                                  const Numeric& Tl,
                                  const Numeric& El,
                                  const Numeric& r_low = 1.0);

Numeric dabsorption_nlte_rate_dTu(const Numeric& gamma,
                                  const Numeric& T,
                                  const Numeric& Tu,
                                  const Numeric& Eu,
                                  const Numeric& r_upp = 1.0);

#endif  // linescaling_h