Line data    Source code

       1             : /**
       2             :    \file tbutils.cpp
       3             :    Bojan Nikolic <bn204@mrao.cam.ac.uk>, <bojan@bnikolic.co.uk>
       4             :    
       5             :    Initial version May 2008
       6             :    Maintained by ESO since 2013.
       7             :    Renamed tbutils.cc 2023
       8             : 
       9             : */
      10             : 
      11             : #include "tbutils.h"
      12             : #include "basicphys.h"
      13             : 
      14             : namespace LibAIR2 {
      15             :   
      16           0 :   double PlanckToRJ(double f,
      17             :                     double TPlanck)
      18             :   {
      19           0 :     const double I = BPlanck(f, TPlanck);
      20           0 :     const double TRJ=  I / std::pow(f,2)  * CSquared_On_TwoK;
      21           0 :     return TRJ;
      22             :   }
      23             : 
      24             : }
      25             :