<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/> <meta http-equiv="X-UA-Compatible" content="IE=9"/> <meta name="generator" content="Doxygen 1.8.5"/> <title>cloudy: /home/iurt/rpmbuild/BUILD/c13.01/source/atom_hyperfine.cpp Source File</title> <link href="tabs.css" rel="stylesheet" type="text/css"/> <script type="text/javascript" src="jquery.js"></script> <script type="text/javascript" src="dynsections.js"></script> <link href="search/search.css" rel="stylesheet" type="text/css"/> <script type="text/javascript" src="search/search.js"></script> <script type="text/javascript"> $(document).ready(function() { searchBox.OnSelectItem(0); }); </script> <link href="doxygen.css" rel="stylesheet" type="text/css" /> </head> <body> <div id="top"><!-- do not remove this div, it is closed by doxygen! --> <div id="titlearea"> <table cellspacing="0" cellpadding="0"> <tbody> <tr style="height: 56px;"> <td style="padding-left: 0.5em;"> <div id="projectname">cloudy  <span id="projectnumber">trunk</span> </div> </td> </tr> </tbody> </table> </div> <!-- end header part --> <!-- Generated by Doxygen 1.8.5 --> <script type="text/javascript"> var searchBox = new SearchBox("searchBox", "search",false,'Search'); </script> <div id="navrow1" class="tabs"> <ul class="tablist"> <li><a href="index.html"><span>Main Page</span></a></li> <li><a href="pages.html"><span>Related Pages</span></a></li> <li><a href="namespaces.html"><span>Namespaces</span></a></li> <li><a href="annotated.html"><span>Data Structures</span></a></li> <li class="current"><a href="files.html"><span>Files</span></a></li> <li> <div id="MSearchBox" class="MSearchBoxInactive"> <span class="left"> <img id="MSearchSelect" src="search/mag_sel.png" onmouseover="return searchBox.OnSearchSelectShow()" onmouseout="return searchBox.OnSearchSelectHide()" alt=""/> <input type="text" id="MSearchField" value="Search" accesskey="S" onfocus="searchBox.OnSearchFieldFocus(true)" onblur="searchBox.OnSearchFieldFocus(false)" onkeyup="searchBox.OnSearchFieldChange(event)"/> </span><span class="right"> <a id="MSearchClose" href="javascript:searchBox.CloseResultsWindow()"><img id="MSearchCloseImg" border="0" src="search/close.png" alt=""/></a> </span> </div> </li> </ul> </div> <div id="navrow2" class="tabs2"> <ul class="tablist"> <li><a href="files.html"><span>File List</span></a></li> <li><a href="globals.html"><span>Globals</span></a></li> </ul> </div> <!-- window showing the filter options --> <div id="MSearchSelectWindow" onmouseover="return searchBox.OnSearchSelectShow()" onmouseout="return searchBox.OnSearchSelectHide()" onkeydown="return searchBox.OnSearchSelectKey(event)"> <a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(0)"><span class="SelectionMark"> </span>All</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(1)"><span class="SelectionMark"> </span>Data Structures</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(2)"><span class="SelectionMark"> </span>Namespaces</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(3)"><span class="SelectionMark"> </span>Files</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(4)"><span class="SelectionMark"> </span>Functions</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(5)"><span class="SelectionMark"> </span>Variables</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(6)"><span class="SelectionMark"> </span>Typedefs</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(7)"><span class="SelectionMark"> </span>Enumerations</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(8)"><span class="SelectionMark"> </span>Enumerator</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(9)"><span class="SelectionMark"> </span>Friends</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(10)"><span class="SelectionMark"> </span>Macros</a><a class="SelectItem" href="javascript:void(0)" onclick="searchBox.OnSelectItem(11)"><span class="SelectionMark"> </span>Pages</a></div> <!-- iframe showing the search results (closed by default) --> <div id="MSearchResultsWindow"> <iframe src="javascript:void(0)" frameborder="0" name="MSearchResults" id="MSearchResults"> </iframe> </div> <div id="nav-path" class="navpath"> <ul> <li class="navelem"><a class="el" href="dir_b2f33c71d4aa5e7af42a1ca61ff5af1b.html">source</a></li> </ul> </div> </div><!-- top --> <div class="header"> <div class="headertitle"> <div class="title">atom_hyperfine.cpp</div> </div> </div><!--header--> <div class="contents"> <a href="atom__hyperfine_8cpp.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span> <span class="comment">/* This file is part of Cloudy and is copyright (C)1978-2013 by Gary J. Ferland and</span></div> <div class="line"><a name="l00002"></a><span class="lineno"> 2</span> <span class="comment"> * others. For conditions of distribution and use see copyright notice in license.txt */</span></div> <div class="line"><a name="l00003"></a><span class="lineno"> 3</span> <span class="comment">/* HyperfineCreat establish space for hf arrays, reads atomic data from hyperfine.dat */</span></div> <div class="line"><a name="l00004"></a><span class="lineno"> 4</span> <span class="comment">/* HyperfineCS - returns collision strengths for hyperfine struc transitions */</span></div> <div class="line"><a name="l00005"></a><span class="lineno"> 5</span> <span class="comment">/*H21cm computes rate for H 21 cm from upper to lower excitation by atomic hydrogen */</span> </div> <div class="line"><a name="l00006"></a><span class="lineno"> 6</span> <span class="comment">/*h21_t_ge_20 compute rate for H 21 cm from upper to lower excitation by atomic hydrogen */</span> </div> <div class="line"><a name="l00007"></a><span class="lineno"> 7</span> <span class="comment">/*h21_t_lt_20 compute rate for H 21 cm from upper to lower excitation by atomic hydrogen */</span> </div> <div class="line"><a name="l00008"></a><span class="lineno"> 8</span> <span class="comment">/*H21cm_electron compute H 21 cm rate from upper to lower excitation by electrons - call by CoolEvaluate */</span></div> <div class="line"><a name="l00009"></a><span class="lineno"> 9</span> <span class="comment">/*H21cm_H_atom - evaluate H atom spin changing collision rate, called by CoolEvaluate */</span></div> <div class="line"><a name="l00010"></a><span class="lineno"> 10</span> <span class="comment">/*H21cm_proton - evaluate proton spin changing H atom collision rate, */</span></div> <div class="line"><a name="l00011"></a><span class="lineno"> 11</span> <span class="preprocessor">#include "<a class="code" href="cddefines_8h.html">cddefines.h</a>"</span></div> <div class="line"><a name="l00012"></a><span class="lineno"> 12</span> <span class="preprocessor">#include "<a class="code" href="conv_8h.html">conv.h</a>"</span></div> <div class="line"><a name="l00013"></a><span class="lineno"> 13</span> <span class="preprocessor">#include "<a class="code" href="lines__service_8h.html">lines_service.h</a>"</span></div> <div class="line"><a name="l00014"></a><span class="lineno"> 14</span> <span class="preprocessor">#include "<a class="code" href="phycon_8h.html">phycon.h</a>"</span></div> <div class="line"><a name="l00015"></a><span class="lineno"> 15</span> <span class="preprocessor">#include "<a class="code" href="dense_8h.html">dense.h</a>"</span></div> <div class="line"><a name="l00016"></a><span class="lineno"> 16</span> <span class="preprocessor">#include "<a class="code" href="rfield_8h.html">rfield.h</a>"</span></div> <div class="line"><a name="l00017"></a><span class="lineno"> 17</span> <span class="preprocessor">#include "<a class="code" href="taulines_8h.html">taulines.h</a>"</span></div> <div class="line"><a name="l00018"></a><span class="lineno"> 18</span> <span class="preprocessor">#include "<a class="code" href="iso_8h.html">iso.h</a>"</span></div> <div class="line"><a name="l00019"></a><span class="lineno"> 19</span> <span class="preprocessor">#include "<a class="code" href="trace_8h.html">trace.h</a>"</span></div> <div class="line"><a name="l00020"></a><span class="lineno"> 20</span> <span class="preprocessor">#include "<a class="code" href="hyperfine_8h.html">hyperfine.h</a>"</span></div> <div class="line"><a name="l00021"></a><span class="lineno"> 21</span> <span class="preprocessor">#include "<a class="code" href="physconst_8h.html">physconst.h</a>"</span> </div> <div class="line"><a name="l00022"></a><span class="lineno"> 22</span> </div> <div class="line"><a name="l00023"></a><span class="lineno"> 23</span> <span class="comment">/* H21_cm_pops - fine level populations for 21 cm with Lya pumping included </span></div> <div class="line"><a name="l00024"></a><span class="lineno"> 24</span> <span class="comment"> * called in CoolEvaluate */</span></div> <div class="line"><a name="l00025"></a><span class="lineno"><a class="line" href="hyperfine_8h.html#ad2805dabda6ce26fb9bdd2001cf3757b"> 25</a></span> <span class="keywordtype">void</span> <a class="code" href="atom__hyperfine_8cpp.html#ad2805dabda6ce26fb9bdd2001cf3757b">H21_cm_pops</a>( <span class="keywordtype">void</span> )</div> <div class="line"><a name="l00026"></a><span class="lineno"> 26</span> {</div> <div class="line"><a name="l00027"></a><span class="lineno"> 27</span>  <span class="comment">/*atom_level2( HFLines[0] );*/</span></div> <div class="line"><a name="l00028"></a><span class="lineno"> 28</span>  <span class="comment">/*return;*/</span></div> <div class="line"><a name="l00029"></a><span class="lineno"> 29</span>  <span class="comment">/*</span></div> <div class="line"><a name="l00030"></a><span class="lineno"> 30</span> <span class="comment"> things we know on entry to this routine:</span></div> <div class="line"><a name="l00031"></a><span class="lineno"> 31</span> <span class="comment"> total population of 2p: iso_sp[ipH_LIKE][ipHYDROGEN].st[ipH2p].Pop</span></div> <div class="line"><a name="l00032"></a><span class="lineno"> 32</span> <span class="comment"> total population of 1s: iso_sp[ipH_LIKE][ipHYDROGEN].st[ipH1s].Pop</span></div> <div class="line"><a name="l00033"></a><span class="lineno"> 33</span> <span class="comment"> continuum pumping rate (lo-up) inside 21 cm line: HFLines[0].pump()</span></div> <div class="line"><a name="l00034"></a><span class="lineno"> 34</span> <span class="comment"> upper to lower collision rate inside 21 cm line: HFLines[0].cs*dense.cdsqte</span></div> <div class="line"><a name="l00035"></a><span class="lineno"> 35</span> <span class="comment"> occupation number inside Lya: OccupationNumberLine( &iso_sp[ipH_LIKE][ipHYDROGEN].trans(ipH2p,ipH1s) )</span></div> <div class="line"><a name="l00036"></a><span class="lineno"> 36</span> <span class="comment"></span></div> <div class="line"><a name="l00037"></a><span class="lineno"> 37</span> <span class="comment"> level populations (cm-3) must be computed:</span></div> <div class="line"><a name="l00038"></a><span class="lineno"> 38</span> <span class="comment"> population of upper level of 21cm: HFLines[0].Hi->Pop</span></div> <div class="line"><a name="l00039"></a><span class="lineno"> 39</span> <span class="comment"> population of lower level of 21cm: (*HFLines[0].Lo()).Pop</span></div> <div class="line"><a name="l00040"></a><span class="lineno"> 40</span> <span class="comment"> stimulated emission corrected population of lower level: HFLines[0].Emis->PopOpc()</span></div> <div class="line"><a name="l00041"></a><span class="lineno"> 41</span> <span class="comment"> */</span></div> <div class="line"><a name="l00042"></a><span class="lineno"> 42</span> </div> <div class="line"><a name="l00043"></a><span class="lineno"> 43</span>  <span class="keywordtype">double</span> x,</div> <div class="line"><a name="l00044"></a><span class="lineno"> 44</span>  PopTot;</div> <div class="line"><a name="l00045"></a><span class="lineno"> 45</span>  <span class="keywordtype">double</span> a32,a31,a41,a42,a21, occnu_lya ,</div> <div class="line"><a name="l00046"></a><span class="lineno"> 46</span>  rate12 , rate21 , pump12 , pump21 , coll12 , coll21,</div> <div class="line"><a name="l00047"></a><span class="lineno"> 47</span>  texc , occnu_lya_23 , occnu_lya_13,occnu_lya_24,occnu_lya_14, texc1, texc2;</div> <div class="line"><a name="l00048"></a><span class="lineno"> 48</span> </div> <div class="line"><a name="l00049"></a><span class="lineno"> 49</span>  PopTot = <a class="code" href="iso_8cpp.html#ab57c2051ee65e0236231a59103b5e80c">iso_sp</a>[<a class="code" href="iso_8h.html#ac9adcc2e25a84dbcfaf67a9753504f29">ipH_LIKE</a>][<a class="code" href="cddefines_8h.html#ad230dc2b848c4445597e35b10e37bb74">ipHYDROGEN</a>].<a class="code" href="classt__iso__sp.html#abed262ca9c3408aadb4a4e3e0c902172">st</a>[<a class="code" href="iso_8h.html#a1c4a2ccd8a77c449fcf2ec2eb4561c22">ipH1s</a>].Pop();</div> <div class="line"><a name="l00050"></a><span class="lineno"> 50</span>  <span class="comment">/* population can be zero in certain tests where H is turned off,</span></div> <div class="line"><a name="l00051"></a><span class="lineno"> 51</span> <span class="comment"> * also if initial solver does not see any obvious source of ionization</span></div> <div class="line"><a name="l00052"></a><span class="lineno"> 52</span> <span class="comment"> * also possible to set H0 density to zero with element ionization command,</span></div> <div class="line"><a name="l00053"></a><span class="lineno"> 53</span> <span class="comment"> * as is done in func_set_ion test case */</span></div> <div class="line"><a name="l00054"></a><span class="lineno"> 54</span>  <span class="keywordflow">if</span>( PopTot <0 )</div> <div class="line"><a name="l00055"></a><span class="lineno"> 55</span>  <a class="code" href="cddefines_8h.html#ac55e0608660d9a2b8dc1cc14d7f59081">TotalInsanity</a>();</div> <div class="line"><a name="l00056"></a><span class="lineno"> 56</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span>( PopTot == 0 )</div> <div class="line"><a name="l00057"></a><span class="lineno"> 57</span>  {</div> <div class="line"><a name="l00058"></a><span class="lineno"> 58</span>  <span class="comment">/*return after zeroing local variables */</span></div> <div class="line"><a name="l00059"></a><span class="lineno"> 59</span>  (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Hi()).Pop() = 0.;</div> <div class="line"><a name="l00060"></a><span class="lineno"> 60</span>  (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Lo()).Pop() = 0.;</div> <div class="line"><a name="l00061"></a><span class="lineno"> 61</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().PopOpc() = 0.;</div> <div class="line"><a name="l00062"></a><span class="lineno"> 62</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().phots() = 0.;</div> <div class="line"><a name="l00063"></a><span class="lineno"> 63</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().xIntensity() = 0.;</div> <div class="line"><a name="l00064"></a><span class="lineno"> 64</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().ColOvTot() = 0.;</div> <div class="line"><a name="l00065"></a><span class="lineno"> 65</span>  <a class="code" href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a>.<a class="code" href="structt__hyperfine.html#abbcbbc39d2f4af53a664ba8d4a7f4d64">Tspin21cm</a> = 0.;</div> <div class="line"><a name="l00066"></a><span class="lineno"> 66</span>  <span class="keywordflow">return</span>;</div> <div class="line"><a name="l00067"></a><span class="lineno"> 67</span>  }</div> <div class="line"><a name="l00068"></a><span class="lineno"> 68</span> </div> <div class="line"><a name="l00069"></a><span class="lineno"> 69</span>  a31 = 2.08e8; <span class="comment">/* Einstein co-efficient for transition 1p1/2 to 0s1/2 */</span></div> <div class="line"><a name="l00070"></a><span class="lineno"> 70</span>  a32 = 4.16e8; <span class="comment">/* Einstein co-efficient for transition 1p1/2 to 1s1/2 */</span></div> <div class="line"><a name="l00071"></a><span class="lineno"> 71</span>  a41 = 4.16e8; <span class="comment">/* Einstein co-efficient for transition 1p3/2 to 0s1/2 */</span></div> <div class="line"><a name="l00072"></a><span class="lineno"> 72</span>  a42 = 2.08e8; <span class="comment">/* Einstein co-efficient for transition 1p3/2 to 1s1/2 */</span></div> <div class="line"><a name="l00073"></a><span class="lineno"> 73</span>  <span class="comment">/* These A values are determined from eqn. 17.64 of "The theory of Atomic structure</span></div> <div class="line"><a name="l00074"></a><span class="lineno"> 74</span> <span class="comment"> * and Spectra" by R. D. Cowan </span></div> <div class="line"><a name="l00075"></a><span class="lineno"> 75</span> <span class="comment"> * A hyperfine level has degeneracy Gf=(2F + 1)</span></div> <div class="line"><a name="l00076"></a><span class="lineno"> 76</span> <span class="comment"> * a2p1s = 6.24e8; Einstein co-efficient for transition 2p to 1s */</span></div> <div class="line"><a name="l00077"></a><span class="lineno"> 77</span>  a21 = 2.85e-15; <span class="comment">/* Einstein co-efficient for transition 1s1/2 to 0s1/2 */</span></div> <div class="line"><a name="l00078"></a><span class="lineno"> 78</span> </div> <div class="line"><a name="l00079"></a><span class="lineno"> 79</span>  <span class="comment">/* above is spontaneous rate - the net rate is this times escape and destruction</span></div> <div class="line"><a name="l00080"></a><span class="lineno"> 80</span> <span class="comment"> * probabilities */</span></div> <div class="line"><a name="l00081"></a><span class="lineno"> 81</span>  a21 *= (<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().Pdest() + <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().Pesc() + <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().Pelec_esc());</div> <div class="line"><a name="l00082"></a><span class="lineno"> 82</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( a21>0. );</div> <div class="line"><a name="l00083"></a><span class="lineno"> 83</span> </div> <div class="line"><a name="l00084"></a><span class="lineno"> 84</span>  <span class="comment">/* hyperfine.lgLya_pump_21cm is option to turn off Lya pump</span></div> <div class="line"><a name="l00085"></a><span class="lineno"> 85</span> <span class="comment"> * of 21 cm, with no 21cm lya pump command - note that this</span></div> <div class="line"><a name="l00086"></a><span class="lineno"> 86</span> <span class="comment"> * can be negative if Lya mases - can occur during search phase */</span></div> <div class="line"><a name="l00087"></a><span class="lineno"> 87</span>  occnu_lya = <a class="code" href="transition_8cpp.html#a8d1af23d2cba9e8d212f9d321d6009cb">OccupationNumberLine</a>( <a class="code" href="iso_8cpp.html#ab57c2051ee65e0236231a59103b5e80c">iso_sp</a>[<a class="code" href="iso_8h.html#ac9adcc2e25a84dbcfaf67a9753504f29">ipH_LIKE</a>][<a class="code" href="cddefines_8h.html#ad230dc2b848c4445597e35b10e37bb74">ipHYDROGEN</a>].trans(<a class="code" href="iso_8h.html#a63acd79d87d47a44d38d8cc1b4239c48">ipH2p</a>,<a class="code" href="iso_8h.html#a1c4a2ccd8a77c449fcf2ec2eb4561c22">ipH1s</a>) ) *</div> <div class="line"><a name="l00088"></a><span class="lineno"> 88</span>  <a class="code" href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a>.<a class="code" href="structt__hyperfine.html#a143e00775caee84acb615181a28c320f">lgLya_pump_21cm</a>;</div> <div class="line"><a name="l00089"></a><span class="lineno"> 89</span>  <span class="keywordflow">if</span>( occnu_lya<0 )</div> <div class="line"><a name="l00090"></a><span class="lineno"> 90</span>  {</div> <div class="line"><a name="l00091"></a><span class="lineno"> 91</span>  <span class="keyword">static</span> <span class="keywordtype">bool</span> lgCommentDone = <span class="keyword">false</span>;</div> <div class="line"><a name="l00092"></a><span class="lineno"> 92</span>  <span class="comment">/* Lya is masing - could be due to very bad solution in search phase */</span></div> <div class="line"><a name="l00093"></a><span class="lineno"> 93</span>  <span class="keywordflow">if</span>( !<a class="code" href="conv_8cpp.html#a02aae728cb00079244fd6d41fefdc959">conv</a>.<a class="code" href="structt__conv.html#af927d37582560e64e2a55704f18aab0b">lgSearch</a> && !lgCommentDone )</div> <div class="line"><a name="l00094"></a><span class="lineno"> 94</span>  {</div> <div class="line"><a name="l00095"></a><span class="lineno"> 95</span>  fprintf(<a class="code" href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a>,</div> <div class="line"><a name="l00096"></a><span class="lineno"> 96</span>  <span class="stringliteral">"NOTE Lya masing will invert 21 cm, occupation number set zero\n"</span>);</div> <div class="line"><a name="l00097"></a><span class="lineno"> 97</span>  lgCommentDone = <span class="keyword">true</span>;</div> <div class="line"><a name="l00098"></a><span class="lineno"> 98</span>  }</div> <div class="line"><a name="l00099"></a><span class="lineno"> 99</span>  occnu_lya = 0.;</div> <div class="line"><a name="l00100"></a><span class="lineno"> 100</span>  }</div> <div class="line"><a name="l00101"></a><span class="lineno"> 101</span> </div> <div class="line"><a name="l00102"></a><span class="lineno"> 102</span>  <span class="comment">/* Lya occupation number for the hyperfine levels 0S1/2 and 1S1/2 are different*/</span></div> <div class="line"><a name="l00103"></a><span class="lineno"> 103</span>  texc = <a class="code" href="transition_8cpp.html#ab7b73eb6a4604a103f9538de337fec18">TexcLine</a>( <a class="code" href="iso_8cpp.html#ab57c2051ee65e0236231a59103b5e80c">iso_sp</a>[<a class="code" href="iso_8h.html#ac9adcc2e25a84dbcfaf67a9753504f29">ipH_LIKE</a>][<a class="code" href="cddefines_8h.html#ad230dc2b848c4445597e35b10e37bb74">ipHYDROGEN</a>].trans(<a class="code" href="iso_8h.html#a63acd79d87d47a44d38d8cc1b4239c48">ipH2p</a>,<a class="code" href="iso_8h.html#a1c4a2ccd8a77c449fcf2ec2eb4561c22">ipH1s</a>) );</div> <div class="line"><a name="l00104"></a><span class="lineno"> 104</span>  <span class="comment">/* Energy difference between 2p1/2 and 2p3/2 taken from NSRDS */</span></div> <div class="line"><a name="l00105"></a><span class="lineno"> 105</span>  <span class="keywordflow">if</span>( texc > 0. )</div> <div class="line"><a name="l00106"></a><span class="lineno"> 106</span>  {</div> <div class="line"><a name="l00107"></a><span class="lineno"> 107</span>  <span class="comment">/* convert to Boltzmann factor, which will applied to occupation </span></div> <div class="line"><a name="l00108"></a><span class="lineno"> 108</span> <span class="comment"> * number of higher energy transition */</span></div> <div class="line"><a name="l00109"></a><span class="lineno"> 109</span>  texc1 = <a class="code" href="cddefines_8h.html#a0949cd6050ce9bd2506528396ef7424f">sexp</a>(0.068/texc);</div> <div class="line"><a name="l00110"></a><span class="lineno"> 110</span>  texc2 = <a class="code" href="cddefines_8h.html#a0949cd6050ce9bd2506528396ef7424f">sexp</a>(((82259.272-82258.907)*<a class="code" href="physconst_8h.html#a93f822e34d056465aab7d7a6d115709c">T1CM</a>)/texc);</div> <div class="line"><a name="l00111"></a><span class="lineno"> 111</span>  }</div> <div class="line"><a name="l00112"></a><span class="lineno"> 112</span>  <span class="keywordflow">else</span></div> <div class="line"><a name="l00113"></a><span class="lineno"> 113</span>  {</div> <div class="line"><a name="l00114"></a><span class="lineno"> 114</span>  texc1 = 0.;</div> <div class="line"><a name="l00115"></a><span class="lineno"> 115</span>  texc2 = 0.;</div> <div class="line"><a name="l00116"></a><span class="lineno"> 116</span>  }</div> <div class="line"><a name="l00117"></a><span class="lineno"> 117</span> </div> <div class="line"><a name="l00118"></a><span class="lineno"> 118</span>  <span class="comment">/* the continuum within Lya seen by the two levels is not exactly the same brightness. They</span></div> <div class="line"><a name="l00119"></a><span class="lineno"> 119</span> <span class="comment"> * differ by the exp when Lya is on Wein tail of black body, which must be true if 21 cm is important */</span></div> <div class="line"><a name="l00120"></a><span class="lineno"> 120</span> </div> <div class="line"><a name="l00121"></a><span class="lineno"> 121</span>  occnu_lya_23 = occnu_lya;</div> <div class="line"><a name="l00122"></a><span class="lineno"> 122</span>  occnu_lya_13 = occnu_lya*texc1;</div> <div class="line"><a name="l00123"></a><span class="lineno"> 123</span>  occnu_lya_14 = occnu_lya_13*texc2;</div> <div class="line"><a name="l00124"></a><span class="lineno"> 124</span>  occnu_lya_24 = occnu_lya*texc2;</div> <div class="line"><a name="l00125"></a><span class="lineno"> 125</span> </div> <div class="line"><a name="l00126"></a><span class="lineno"> 126</span>  <span class="comment">/* this is the 21 cm upward continuum pumping rate [s-1] for the attenuated incident and</span></div> <div class="line"><a name="l00127"></a><span class="lineno"> 127</span> <span class="comment"> * local continuum and including line optical depths */</span></div> <div class="line"><a name="l00128"></a><span class="lineno"> 128</span>  pump12 = <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().pump();</div> <div class="line"><a name="l00129"></a><span class="lineno"> 129</span>  pump21 = pump12 * (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Lo()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>() / (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Hi()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>();</div> <div class="line"><a name="l00130"></a><span class="lineno"> 130</span> </div> <div class="line"><a name="l00131"></a><span class="lineno"> 131</span>  <span class="comment">/* collision rates s-1 within 1s,</span></div> <div class="line"><a name="l00132"></a><span class="lineno"> 132</span> <span class="comment"> * were multiplied by collider density when evaluated in CoolEvaluate */</span></div> <div class="line"><a name="l00133"></a><span class="lineno"> 133</span>  <span class="comment">/* ContBoltz is Boltzmann factor for wavelength of line */</span></div> <div class="line"><a name="l00134"></a><span class="lineno"> 134</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Coll().<a class="code" href="species2_8cpp.html#a1662e9eebf1c47ea5772bd18d77a5f15">col_str</a>()>0. );</div> <div class="line"><a name="l00135"></a><span class="lineno"> 135</span>  coll12 = <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Coll().col_str()*<a class="code" href="dense_8cpp.html#a61a760c32a26242e4eb24e230b3d5c57">dense</a>.<a class="code" href="structt__dense.html#a53085031083ac598a3b49661acd03792">cdsqte</a>/(*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Lo()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>()*<a class="code" href="rfield_8cpp.html#ae577590833d90679b27a7e2b237ee667">rfield</a>.<a class="code" href="structt__rfield.html#ac936125b75f9726c50fa0b11ccb6ea19">ContBoltz</a>[<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].ipCont()-1];</div> <div class="line"><a name="l00136"></a><span class="lineno"> 136</span>  coll21 = <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Coll().col_str()*<a class="code" href="dense_8cpp.html#a61a760c32a26242e4eb24e230b3d5c57">dense</a>.<a class="code" href="structt__dense.html#a53085031083ac598a3b49661acd03792">cdsqte</a>/(*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Hi()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>();</div> <div class="line"><a name="l00137"></a><span class="lineno"> 137</span> </div> <div class="line"><a name="l00138"></a><span class="lineno"> 138</span>  <span class="comment">/* set up rate (s-1) equations</span></div> <div class="line"><a name="l00139"></a><span class="lineno"> 139</span> <span class="comment"> * all process out of 1 that eventually go to 2 */</span></div> <div class="line"><a name="l00140"></a><span class="lineno"> 140</span>  rate12 = </div> <div class="line"><a name="l00141"></a><span class="lineno"> 141</span>  <span class="comment">/* collision rate (s-1) from 1 to 2 */</span></div> <div class="line"><a name="l00142"></a><span class="lineno"> 142</span>  coll12 + </div> <div class="line"><a name="l00143"></a><span class="lineno"> 143</span>  <span class="comment">/* direct external continuum pumping (s-1) in 21 cm line - usually dominated by CMB */</span></div> <div class="line"><a name="l00144"></a><span class="lineno"> 144</span>  pump12 +</div> <div class="line"><a name="l00145"></a><span class="lineno"> 145</span>  <span class="comment">/* pump rate (s-1) up to 3, times fraction that decay to 2, hence net 1-2 */</span></div> <div class="line"><a name="l00146"></a><span class="lineno"> 146</span>  3.*a31*occnu_lya_13 *a32/(a31+a32)+</div> <div class="line"><a name="l00147"></a><span class="lineno"> 147</span>  <span class="comment">/* pump rate (s-1) up to 4, times fraction that decay to 2, hence net 1-2 */</span></div> <div class="line"><a name="l00148"></a><span class="lineno"> 148</span>  <span class="comment">/* >>chng 05 apr 04, GS, degeneracy corrected from 6 to 3 */</span></div> <div class="line"><a name="l00149"></a><span class="lineno"> 149</span>  3.*a41*occnu_lya_14 *a42/(a41+a42);</div> <div class="line"><a name="l00150"></a><span class="lineno"> 150</span> </div> <div class="line"><a name="l00151"></a><span class="lineno"> 151</span>  <span class="comment">/* set up rate (s-1) equations</span></div> <div class="line"><a name="l00152"></a><span class="lineno"> 152</span> <span class="comment"> * all process out of 2 that eventually go to 1 */</span></div> <div class="line"><a name="l00153"></a><span class="lineno"> 153</span>  <span class="comment">/* spontaneous + induced 2 -> 1 by external continuum inside 21 cm line */</span></div> <div class="line"><a name="l00154"></a><span class="lineno"> 154</span>  <span class="comment">/* >>chng 04 dec 03, do not include spontaneous decay, for numerical stability */</span></div> <div class="line"><a name="l00155"></a><span class="lineno"> 155</span>  rate21 = </div> <div class="line"><a name="l00156"></a><span class="lineno"> 156</span>  <span class="comment">/* collisional deexcitation */</span></div> <div class="line"><a name="l00157"></a><span class="lineno"> 157</span>  coll21 +</div> <div class="line"><a name="l00158"></a><span class="lineno"> 158</span>  <span class="comment">/* net spontaneous decay plus external continuum pumping in 21 cm line */</span></div> <div class="line"><a name="l00159"></a><span class="lineno"> 159</span>  pump21 +</div> <div class="line"><a name="l00160"></a><span class="lineno"> 160</span>  <span class="comment">/* rate from 2 to 3 time fraction that go back to 1, hence net 2 - 1 */</span></div> <div class="line"><a name="l00161"></a><span class="lineno"> 161</span>  <span class="comment">/* >>chng 05 apr 04,GS, degeneracy corrected from 2 to unity */</span></div> <div class="line"><a name="l00162"></a><span class="lineno"> 162</span>  occnu_lya_23*a32 * a31/(a31+a32)+</div> <div class="line"><a name="l00163"></a><span class="lineno"> 163</span>  occnu_lya_24*a42*a41/(a41+a42);</div> <div class="line"><a name="l00164"></a><span class="lineno"> 164</span> </div> <div class="line"><a name="l00165"></a><span class="lineno"> 165</span>  <span class="comment">/* x = (*HFLines[0].Hi()).Pop/(*HFLines[0].Lo()).Pop */</span></div> <div class="line"><a name="l00166"></a><span class="lineno"> 166</span>  x = rate12 / <a class="code" href="cddefines_8h.html#ad1fdf827e851b9f69048a3ded076569b">SDIV</a>(a21 + rate21);</div> <div class="line"><a name="l00167"></a><span class="lineno"> 167</span> </div> <div class="line"><a name="l00168"></a><span class="lineno"> 168</span>  <span class="comment">/* the Transitions term is the total population of 1s */</span></div> <div class="line"><a name="l00169"></a><span class="lineno"> 169</span>  (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Hi()).Pop() = (x/(1.+x))* PopTot;</div> <div class="line"><a name="l00170"></a><span class="lineno"> 170</span>  (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Lo()).Pop() = (1./(1.+x))* PopTot;</div> <div class="line"><a name="l00171"></a><span class="lineno"> 171</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Hi()).Pop() >0. );</div> <div class="line"><a name="l00172"></a><span class="lineno"> 172</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Lo()).Pop() >0. );</div> <div class="line"><a name="l00173"></a><span class="lineno"> 173</span> </div> <div class="line"><a name="l00174"></a><span class="lineno"> 174</span>  <span class="comment">/* the population with correction for stimulated emission */</span></div> <div class="line"><a name="l00175"></a><span class="lineno"> 175</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().PopOpc() = (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Lo()).Pop()*((3*rate21- rate12) + 3*a21)/<a class="code" href="cddefines_8h.html#ad1fdf827e851b9f69048a3ded076569b">SDIV</a>(3*(a21+ rate21));</div> <div class="line"><a name="l00176"></a><span class="lineno"> 176</span> </div> <div class="line"><a name="l00177"></a><span class="lineno"> 177</span>  <span class="comment">/* number of escaping line photons, used elsewhere for outward beam */</span></div> <div class="line"><a name="l00178"></a><span class="lineno"> 178</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().phots() = (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Hi()).Pop() * <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().Aul() *</div> <div class="line"><a name="l00179"></a><span class="lineno"> 179</span>  (<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().Pesc() + <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().Pelec_esc());</div> <div class="line"><a name="l00180"></a><span class="lineno"> 180</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Emis().phots() >= 0. );</div> <div class="line"><a name="l00181"></a><span class="lineno"> 181</span>  <span class="comment">/* intensity of line */</span></div> <div class="line"><a name="l00182"></a><span class="lineno"> 182</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().xIntensity() = <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().phots()*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].EnergyErg();</div> <div class="line"><a name="l00183"></a><span class="lineno"> 183</span> </div> <div class="line"><a name="l00184"></a><span class="lineno"> 184</span>  <span class="comment">/* ratio of collisional to total (collisional + pumped) excitation */</span></div> <div class="line"><a name="l00185"></a><span class="lineno"> 185</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().ColOvTot() = coll12 / rate12;</div> <div class="line"><a name="l00186"></a><span class="lineno"> 186</span> </div> <div class="line"><a name="l00187"></a><span class="lineno"> 187</span>  <span class="comment">/* finally save the spin temperature */</span></div> <div class="line"><a name="l00188"></a><span class="lineno"> 188</span>  <span class="keywordflow">if</span>( (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0].Hi()).Pop() > <a class="code" href="cpu_8h.html#af1d998d79044c9644b48f8d5647d57b6">SMALLFLOAT</a> )</div> <div class="line"><a name="l00189"></a><span class="lineno"> 189</span>  {</div> <div class="line"><a name="l00190"></a><span class="lineno"> 190</span>  <a class="code" href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a>.<a class="code" href="structt__hyperfine.html#abbcbbc39d2f4af53a664ba8d4a7f4d64">Tspin21cm</a> = <a class="code" href="transition_8cpp.html#ab7b73eb6a4604a103f9538de337fec18">TexcLine</a>( <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[0] );</div> <div class="line"><a name="l00191"></a><span class="lineno"> 191</span>  <span class="comment">/* this line must be non-zero - it does strongly mase in limit_compton_hi_t sim -</span></div> <div class="line"><a name="l00192"></a><span class="lineno"> 192</span> <span class="comment"> * in that sim pop ratio goes to unity for a float and TexcLine ret zero */</span></div> <div class="line"><a name="l00193"></a><span class="lineno"> 193</span>  <span class="keywordflow">if</span>( <a class="code" href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a>.<a class="code" href="structt__hyperfine.html#abbcbbc39d2f4af53a664ba8d4a7f4d64">Tspin21cm</a> == 0. )</div> <div class="line"><a name="l00194"></a><span class="lineno"> 194</span>  <a class="code" href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a>.<a class="code" href="structt__hyperfine.html#abbcbbc39d2f4af53a664ba8d4a7f4d64">Tspin21cm</a> = <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a>;</div> <div class="line"><a name="l00195"></a><span class="lineno"> 195</span>  }</div> <div class="line"><a name="l00196"></a><span class="lineno"> 196</span>  <span class="keywordflow">else</span></div> <div class="line"><a name="l00197"></a><span class="lineno"> 197</span>  {</div> <div class="line"><a name="l00198"></a><span class="lineno"> 198</span>  <a class="code" href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a>.<a class="code" href="structt__hyperfine.html#abbcbbc39d2f4af53a664ba8d4a7f4d64">Tspin21cm</a> = <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a>;</div> <div class="line"><a name="l00199"></a><span class="lineno"> 199</span>  }</div> <div class="line"><a name="l00200"></a><span class="lineno"> 200</span> </div> <div class="line"><a name="l00201"></a><span class="lineno"> 201</span>  <span class="keywordflow">return</span>;</div> <div class="line"><a name="l00202"></a><span class="lineno"> 202</span> }</div> <div class="line"><a name="l00203"></a><span class="lineno"> 203</span> </div> <div class="line"><a name="l00204"></a><span class="lineno"> 204</span> <span class="comment">/*H21cm_electron computes rate for H 21 cm from upper to lower excitation by electrons - call by CoolEvaluate</span></div> <div class="line"><a name="l00205"></a><span class="lineno"> 205</span> <span class="comment"> * >>refer H1 CS Smith, F. J. 1966, Planet. Space Sci., 14, 929 */</span></div> <div class="line"><a name="l00206"></a><span class="lineno"><a class="line" href="hyperfine_8h.html#a33952f082dfc1cd8667a512b332e915f"> 206</a></span> <span class="keywordtype">double</span> <a class="code" href="atom__hyperfine_8cpp.html#a33952f082dfc1cd8667a512b332e915f">H21cm_electron</a>( <span class="keywordtype">double</span> temp )</div> <div class="line"><a name="l00207"></a><span class="lineno"> 207</span> {</div> <div class="line"><a name="l00208"></a><span class="lineno"> 208</span>  <span class="keywordtype">double</span> hold;</div> <div class="line"><a name="l00209"></a><span class="lineno"> 209</span>  temp = <a class="code" href="cddefines_8h.html#a393053491edc087c17e89d597b6e16f5">MIN2</a>(1e4 , temp );</div> <div class="line"><a name="l00210"></a><span class="lineno"> 210</span>  <span class="comment">/* following fit is from */</span></div> <div class="line"><a name="l00211"></a><span class="lineno"> 211</span>  <span class="comment">/* >>refer H1 21cm Liszt, H. 2001, A&A, 371, 698 */</span></div> <div class="line"><a name="l00212"></a><span class="lineno"> 212</span> </div> <div class="line"><a name="l00213"></a><span class="lineno"> 213</span>  hold = -9.607 + log10( sqrt(temp)) * <a class="code" href="cddefines_8h.html#a0949cd6050ce9bd2506528396ef7424f">sexp</a>( pow(log10(temp) , 4.5 ) / 1800. );</div> <div class="line"><a name="l00214"></a><span class="lineno"> 214</span>  hold = pow(10.,hold );</div> <div class="line"><a name="l00215"></a><span class="lineno"> 215</span>  <span class="keywordflow">return</span>( hold );</div> <div class="line"><a name="l00216"></a><span class="lineno"> 216</span> }</div> <div class="line"><a name="l00217"></a><span class="lineno"> 217</span> </div> <div class="line"><a name="l00218"></a><span class="lineno"> 218</span> <span class="comment">/* computes rate for H 21 cm from upper to lower excitation by atomic hydrogen </span></div> <div class="line"><a name="l00219"></a><span class="lineno"> 219</span> <span class="comment"> * from </span></div> <div class="line"><a name="l00220"></a><span class="lineno"> 220</span> <span class="comment"> * >>refer H1 CS Allison, A. C., & Dalgarno A. 1969, ApJ 158, 423 */</span></div> <div class="line"><a name="l00221"></a><span class="lineno"> 221</span> <span class="comment">/* the following is the best current survey of 21 cm excitation */</span></div> <div class="line"><a name="l00222"></a><span class="lineno"> 222</span> <span class="comment">/* >>refer H1 21cm Liszt, H. 2001, A&A, 371, 698 */</span></div> <div class="line"><a name="l00223"></a><span class="lineno"> 223</span> <span class="preprocessor">#if 0</span></div> <div class="line"><a name="l00224"></a><span class="lineno"> 224</span> <span class="preprocessor"></span><a class="code" href="cddefines_8h.html#a10b2d890d871e1489bb02b7e70d9bdfb">STATIC</a> <span class="keywordtype">double</span> h21_t_ge_20( <span class="keywordtype">double</span> temp )</div> <div class="line"><a name="l00225"></a><span class="lineno"> 225</span> {</div> <div class="line"><a name="l00226"></a><span class="lineno"> 226</span>  <span class="keywordtype">double</span> y;</div> <div class="line"><a name="l00227"></a><span class="lineno"> 227</span>  <span class="keywordtype">double</span> <a class="code" href="atmdat__3body_8cpp.html#a984eb8f4ba5548d469ca2bdb3b3a9efc">x1</a>,</div> <div class="line"><a name="l00228"></a><span class="lineno"> 228</span>  teorginal = temp;</div> <div class="line"><a name="l00229"></a><span class="lineno"> 229</span>  <span class="comment">/* data go up to 1,000K must not go above this */</span></div> <div class="line"><a name="l00230"></a><span class="lineno"> 230</span>  temp = <a class="code" href="cddefines_8h.html#a393053491edc087c17e89d597b6e16f5">MIN2</a>( 1000.,temp );</div> <div class="line"><a name="l00231"></a><span class="lineno"> 231</span>  x1 =1.0/sqrt(temp);</div> <div class="line"><a name="l00232"></a><span class="lineno"> 232</span>  y =-21.70880995483007-13.76259674006133*<a class="code" href="atmdat__3body_8cpp.html#a984eb8f4ba5548d469ca2bdb3b3a9efc">x1</a>;</div> <div class="line"><a name="l00233"></a><span class="lineno"> 233</span>  y = exp(y);</div> <div class="line"><a name="l00234"></a><span class="lineno"> 234</span> </div> <div class="line"><a name="l00235"></a><span class="lineno"> 235</span>  <span class="comment">/* >>chng 02 feb 14, extrapolate above 1e3 K as per Liszt 2001 recommendation </span></div> <div class="line"><a name="l00236"></a><span class="lineno"> 236</span> <span class="comment"> * page 699 of */</span></div> <div class="line"><a name="l00237"></a><span class="lineno"> 237</span>  <span class="comment">/* >>refer H1 21cm Liszt, H. 2001, A&A, 371, 698 */</span></div> <div class="line"><a name="l00238"></a><span class="lineno"> 238</span>  <span class="keywordflow">if</span>( teorginal > 1e3 )</div> <div class="line"><a name="l00239"></a><span class="lineno"> 239</span>  {</div> <div class="line"><a name="l00240"></a><span class="lineno"> 240</span>  y *= pow(teorginal/1e3 , 0.33 );</div> <div class="line"><a name="l00241"></a><span class="lineno"> 241</span>  }</div> <div class="line"><a name="l00242"></a><span class="lineno"> 242</span> </div> <div class="line"><a name="l00243"></a><span class="lineno"> 243</span>  <span class="keywordflow">return</span>( y );</div> <div class="line"><a name="l00244"></a><span class="lineno"> 244</span> }</div> <div class="line"><a name="l00245"></a><span class="lineno"> 245</span> </div> <div class="line"><a name="l00246"></a><span class="lineno"> 246</span> <span class="comment">/* this branch for T < 20K, data go down to 1 K */</span></div> <div class="line"><a name="l00247"></a><span class="lineno"> 247</span> <a class="code" href="cddefines_8h.html#a10b2d890d871e1489bb02b7e70d9bdfb">STATIC</a> <span class="keywordtype">double</span> h21_t_lt_20( <span class="keywordtype">double</span> temp )</div> <div class="line"><a name="l00248"></a><span class="lineno"> 248</span> {</div> <div class="line"><a name="l00249"></a><span class="lineno"> 249</span>  <span class="keywordtype">double</span> y;</div> <div class="line"><a name="l00250"></a><span class="lineno"> 250</span>  <span class="keywordtype">double</span> <a class="code" href="atmdat__3body_8cpp.html#a984eb8f4ba5548d469ca2bdb3b3a9efc">x1</a>;</div> <div class="line"><a name="l00251"></a><span class="lineno"> 251</span> </div> <div class="line"><a name="l00252"></a><span class="lineno"> 252</span>  <span class="comment">/* must not go below 1K */</span></div> <div class="line"><a name="l00253"></a><span class="lineno"> 253</span>  temp = <a class="code" href="cddefines_8h.html#aa0c19e95ba3c1d759e15a79a136ce3c6">MAX2</a>( 1., temp );</div> <div class="line"><a name="l00254"></a><span class="lineno"> 254</span>  x1 =temp*log(temp);</div> <div class="line"><a name="l00255"></a><span class="lineno"> 255</span>  y =9.720710314268267E-08+6.325515312006680E-08*<a class="code" href="atmdat__3body_8cpp.html#a984eb8f4ba5548d469ca2bdb3b3a9efc">x1</a>;</div> <div class="line"><a name="l00256"></a><span class="lineno"> 256</span>  <span class="keywordflow">return</span>(y*y);</div> <div class="line"><a name="l00257"></a><span class="lineno"> 257</span> }</div> <div class="line"><a name="l00258"></a><span class="lineno"> 258</span> <span class="preprocessor">#endif</span></div> <div class="line"><a name="l00259"></a><span class="lineno"> 259</span> <span class="preprocessor"></span></div> <div class="line"><a name="l00260"></a><span class="lineno"> 260</span> <span class="comment">/* >> chng 04 dec 15, GS. The fitted rate co-efficients (cm3s-1) in the temperature range 1K to 300K is from</span></div> <div class="line"><a name="l00261"></a><span class="lineno"> 261</span> <span class="comment"> * >>refer H1 CS Zygelman, B. 2005, ApJ, 622, 1356 </span></div> <div class="line"><a name="l00262"></a><span class="lineno"> 262</span> <span class="comment"> * The rate is 4/3 times the Dalgarno (1969) rate for the </span></div> <div class="line"><a name="l00263"></a><span class="lineno"> 263</span> <span class="comment"> temperature range 300K to 1000K. Above 1000K, the rate is extrapolated according to Liszt 2001.*/</span></div> <div class="line"><a name="l00264"></a><span class="lineno"><a class="line" href="atom__hyperfine_8cpp.html#adca2f00eec8250235f951d3a7f94797f"> 264</a></span> <a class="code" href="cddefines_8h.html#a10b2d890d871e1489bb02b7e70d9bdfb">STATIC</a> <span class="keywordtype">double</span> <a class="code" href="atom__hyperfine_8cpp.html#adca2f00eec8250235f951d3a7f94797f">h21_t_ge_10</a>( <span class="keywordtype">double</span> temp )</div> <div class="line"><a name="l00265"></a><span class="lineno"> 265</span> {</div> <div class="line"><a name="l00266"></a><span class="lineno"> 266</span>  <span class="keywordtype">double</span> y;</div> <div class="line"><a name="l00267"></a><span class="lineno"> 267</span>  <span class="keywordtype">double</span> <a class="code" href="atmdat__3body_8cpp.html#a984eb8f4ba5548d469ca2bdb3b3a9efc">x1</a>,<a class="code" href="atmdat__3body_8cpp.html#a4e6fc9d0607252ddfb72801404159738">x2</a>,x3,</div> <div class="line"><a name="l00268"></a><span class="lineno"> 268</span>  teorginal = temp;</div> <div class="line"><a name="l00269"></a><span class="lineno"> 269</span>  <span class="comment">/* data go up to 300K */</span></div> <div class="line"><a name="l00270"></a><span class="lineno"> 270</span>  temp = <a class="code" href="cddefines_8h.html#a393053491edc087c17e89d597b6e16f5">MIN2</a>( 300., temp );</div> <div class="line"><a name="l00271"></a><span class="lineno"> 271</span>  x1 =temp;</div> <div class="line"><a name="l00272"></a><span class="lineno"> 272</span>  y =1.4341127e-9+9.4161077e-15*x1-9.2998995e-9/(log(x1))+6.9539411e-9/sqrt(x1)+1.7742293e-8*(log(x1))/<a class="code" href="cddefines_8h.html#a34a972cf4be2379a5ee363b82d623b3a">pow2</a>(x1);</div> <div class="line"><a name="l00273"></a><span class="lineno"> 273</span>  <span class="keywordflow">if</span>( teorginal > 300. )</div> <div class="line"><a name="l00274"></a><span class="lineno"> 274</span>  {</div> <div class="line"><a name="l00275"></a><span class="lineno"> 275</span>  <span class="comment">/* data go up to 1000*/</span></div> <div class="line"><a name="l00276"></a><span class="lineno"> 276</span>  x3 = <a class="code" href="cddefines_8h.html#a393053491edc087c17e89d597b6e16f5">MIN2</a>( 1000., teorginal );</div> <div class="line"><a name="l00277"></a><span class="lineno"> 277</span>  x2 =1.0/sqrt(x3);</div> <div class="line"><a name="l00278"></a><span class="lineno"> 278</span>  y =-21.70880995483007-13.76259674006133*<a class="code" href="atmdat__3body_8cpp.html#a4e6fc9d0607252ddfb72801404159738">x2</a>;</div> <div class="line"><a name="l00279"></a><span class="lineno"> 279</span>  y = 1.236686*exp(y);</div> <div class="line"><a name="l00280"></a><span class="lineno"> 280</span> </div> <div class="line"><a name="l00281"></a><span class="lineno"> 281</span>  }</div> <div class="line"><a name="l00282"></a><span class="lineno"> 282</span>  <span class="keywordflow">if</span>( teorginal > 1e3 )</div> <div class="line"><a name="l00283"></a><span class="lineno"> 283</span>  {</div> <div class="line"><a name="l00284"></a><span class="lineno"> 284</span>  <span class="comment">/*data go above 1000*/</span></div> <div class="line"><a name="l00285"></a><span class="lineno"> 285</span>  y *= pow(teorginal/1e3 , 0.33 );</div> <div class="line"><a name="l00286"></a><span class="lineno"> 286</span>  }</div> <div class="line"><a name="l00287"></a><span class="lineno"> 287</span>  <span class="keywordflow">return</span>( y );</div> <div class="line"><a name="l00288"></a><span class="lineno"> 288</span> }</div> <div class="line"><a name="l00289"></a><span class="lineno"> 289</span> <span class="comment">/* this branch for T < 10K, data go down to 1 K */</span></div> <div class="line"><a name="l00290"></a><span class="lineno"><a class="line" href="atom__hyperfine_8cpp.html#a2de142b89b10b6e4d0385be775703f33"> 290</a></span> <a class="code" href="cddefines_8h.html#a10b2d890d871e1489bb02b7e70d9bdfb">STATIC</a> <span class="keywordtype">double</span> <a class="code" href="atom__hyperfine_8cpp.html#a2de142b89b10b6e4d0385be775703f33">h21_t_lt_10</a>( <span class="keywordtype">double</span> temp )</div> <div class="line"><a name="l00291"></a><span class="lineno"> 291</span> {</div> <div class="line"><a name="l00292"></a><span class="lineno"> 292</span>  <span class="keywordtype">double</span> y;</div> <div class="line"><a name="l00293"></a><span class="lineno"> 293</span>  <span class="keywordtype">double</span> <a class="code" href="atmdat__3body_8cpp.html#a984eb8f4ba5548d469ca2bdb3b3a9efc">x1</a>;</div> <div class="line"><a name="l00294"></a><span class="lineno"> 294</span> </div> <div class="line"><a name="l00295"></a><span class="lineno"> 295</span>  <span class="comment">/* must not go below 1K */</span></div> <div class="line"><a name="l00296"></a><span class="lineno"> 296</span>  temp = <a class="code" href="cddefines_8h.html#aa0c19e95ba3c1d759e15a79a136ce3c6">MAX2</a>(1., temp );</div> <div class="line"><a name="l00297"></a><span class="lineno"> 297</span>  x1 =temp;</div> <div class="line"><a name="l00298"></a><span class="lineno"> 298</span>  y =8.5622857e-10+2.331358e-11*x1+9.5640586e-11*<a class="code" href="cddefines_8h.html#a34a972cf4be2379a5ee363b82d623b3a">pow2</a>(log(x1))-4.6220869e-10*sqrt(x1)-4.1719545e-10/sqrt(x1);</div> <div class="line"><a name="l00299"></a><span class="lineno"> 299</span>  <span class="keywordflow">return</span>(y);</div> <div class="line"><a name="l00300"></a><span class="lineno"> 300</span> }</div> <div class="line"><a name="l00301"></a><span class="lineno"> 301</span> </div> <div class="line"><a name="l00302"></a><span class="lineno"> 302</span> <span class="comment">/*H21cm_H_atom - evaluate H atom spin changing H atom collision rate, </span></div> <div class="line"><a name="l00303"></a><span class="lineno"> 303</span> <span class="comment"> * called by CoolEvaluate </span></div> <div class="line"><a name="l00304"></a><span class="lineno"> 304</span> <span class="comment"> * >>refer H1 CS Allison, A. C. & Dalgarno, A. 1969, ApJ 158, 423 </span></div> <div class="line"><a name="l00305"></a><span class="lineno"> 305</span> <span class="comment"> */</span></div> <div class="line"><a name="l00306"></a><span class="lineno"><a class="line" href="hyperfine_8h.html#a84bbaa1457055b4266971b32037666a4"> 306</a></span> <span class="keywordtype">double</span> <a class="code" href="atom__hyperfine_8cpp.html#a84bbaa1457055b4266971b32037666a4">H21cm_H_atom</a>( <span class="keywordtype">double</span> temp )</div> <div class="line"><a name="l00307"></a><span class="lineno"> 307</span> {</div> <div class="line"><a name="l00308"></a><span class="lineno"> 308</span>  <span class="keywordtype">double</span> hold;</div> <div class="line"><a name="l00309"></a><span class="lineno"> 309</span>  <span class="keywordflow">if</span>( temp >= 10. )</div> <div class="line"><a name="l00310"></a><span class="lineno"> 310</span>  {</div> <div class="line"><a name="l00311"></a><span class="lineno"> 311</span>  hold = <a class="code" href="atom__hyperfine_8cpp.html#adca2f00eec8250235f951d3a7f94797f">h21_t_ge_10</a>( temp );</div> <div class="line"><a name="l00312"></a><span class="lineno"> 312</span>  }</div> <div class="line"><a name="l00313"></a><span class="lineno"> 313</span>  <span class="keywordflow">else</span></div> <div class="line"><a name="l00314"></a><span class="lineno"> 314</span>  {</div> <div class="line"><a name="l00315"></a><span class="lineno"> 315</span>  hold = <a class="code" href="atom__hyperfine_8cpp.html#a2de142b89b10b6e4d0385be775703f33">h21_t_lt_10</a>( temp );</div> <div class="line"><a name="l00316"></a><span class="lineno"> 316</span>  }</div> <div class="line"><a name="l00317"></a><span class="lineno"> 317</span> </div> <div class="line"><a name="l00318"></a><span class="lineno"> 318</span>  <span class="keywordflow">return</span> hold;</div> <div class="line"><a name="l00319"></a><span class="lineno"> 319</span> }</div> <div class="line"><a name="l00320"></a><span class="lineno"> 320</span> </div> <div class="line"><a name="l00321"></a><span class="lineno"> 321</span> <span class="comment">/*H21cm_proton - evaluate proton spin changing H atom collision rate, </span></div> <div class="line"><a name="l00322"></a><span class="lineno"> 322</span> <span class="comment">* called by CoolEvaluate */</span></div> <div class="line"><a name="l00323"></a><span class="lineno"><a class="line" href="hyperfine_8h.html#aa0b5438e6787e8702634ac7b4cd5005a"> 323</a></span> <span class="keywordtype">double</span> <a class="code" href="atom__hyperfine_8cpp.html#aa0b5438e6787e8702634ac7b4cd5005a">H21cm_proton</a>( <span class="keywordtype">double</span> temp )</div> <div class="line"><a name="l00324"></a><span class="lineno"> 324</span> {</div> <div class="line"><a name="l00325"></a><span class="lineno"> 325</span>  <span class="comment">/*>>refer 21cm p coll Furlanetto, S. R. & Furlanetto, M. R. 2007, MNRAS, 379, 130</span></div> <div class="line"><a name="l00326"></a><span class="lineno"> 326</span> <span class="comment"> * previously had used proton rate, which is 3.2 times H0 rate according to</span></div> <div class="line"><a name="l00327"></a><span class="lineno"> 327</span> <span class="comment"> *>>refer 21cm CS Liszt, H. 2001, A&A, 371, 698 */</span></div> <div class="line"><a name="l00328"></a><span class="lineno"> 328</span>  <span class="comment">/* fit to table 1 of first paper */</span></div> <div class="line"><a name="l00329"></a><span class="lineno"> 329</span>  <span class="comment">/*--------------------------------------------------------------*</span></div> <div class="line"><a name="l00330"></a><span class="lineno"> 330</span> <span class="comment"> TableCurve Function: c:\storage\litera~1\21cm\atomic~1\p21cm.c Jun 20, 2007 3:37:50 PM</span></div> <div class="line"><a name="l00331"></a><span class="lineno"> 331</span> <span class="comment"> proton coll deex</span></div> <div class="line"><a name="l00332"></a><span class="lineno"> 332</span> <span class="comment"> X= temperature (K)</span></div> <div class="line"><a name="l00333"></a><span class="lineno"> 333</span> <span class="comment"> Y= rate coefficient (1e-9 cm3 s-1)</span></div> <div class="line"><a name="l00334"></a><span class="lineno"> 334</span> <span class="comment"> Eqn# 4419 y=a+bx+cx^2+dx^(0.5)+elnx/x</span></div> <div class="line"><a name="l00335"></a><span class="lineno"> 335</span> <span class="comment"> r2=0.9999445384690351</span></div> <div class="line"><a name="l00336"></a><span class="lineno"> 336</span> <span class="comment"> r2adj=0.9999168077035526</span></div> <div class="line"><a name="l00337"></a><span class="lineno"> 337</span> <span class="comment"> StdErr=5.559328579039901E-12</span></div> <div class="line"><a name="l00338"></a><span class="lineno"> 338</span> <span class="comment"> Fstat=49581.16793656295</span></div> <div class="line"><a name="l00339"></a><span class="lineno"> 339</span> <span class="comment"> a= 9.588389834316704E-11</span></div> <div class="line"><a name="l00340"></a><span class="lineno"> 340</span> <span class="comment"> b= -5.158891920816405E-14</span></div> <div class="line"><a name="l00341"></a><span class="lineno"> 341</span> <span class="comment"> c= 5.895348443553458E-19</span></div> <div class="line"><a name="l00342"></a><span class="lineno"> 342</span> <span class="comment"> d= 2.05304960232429E-11</span></div> <div class="line"><a name="l00343"></a><span class="lineno"> 343</span> <span class="comment"> e= 9.122617940315725E-10</span></div> <div class="line"><a name="l00344"></a><span class="lineno"> 344</span> <span class="comment"> *--------------------------------------------------------------*/</span></div> <div class="line"><a name="l00345"></a><span class="lineno"> 345</span> </div> <div class="line"><a name="l00346"></a><span class="lineno"> 346</span>  <span class="keywordtype">double</span> hold;</div> <div class="line"><a name="l00347"></a><span class="lineno"> 347</span>  <span class="comment">/* only fit this range, did not include T = 1K point which </span></div> <div class="line"><a name="l00348"></a><span class="lineno"> 348</span> <span class="comment"> * causes an inflection */</span></div> <div class="line"><a name="l00349"></a><span class="lineno"> 349</span>  temp = <a class="code" href="cddefines_8h.html#aa0c19e95ba3c1d759e15a79a136ce3c6">MAX2</a>( 2. , temp );</div> <div class="line"><a name="l00350"></a><span class="lineno"> 350</span>  temp = <a class="code" href="cddefines_8h.html#a393053491edc087c17e89d597b6e16f5">MIN2</a>( 2e4 , temp );</div> <div class="line"><a name="l00351"></a><span class="lineno"> 351</span> </div> <div class="line"><a name="l00352"></a><span class="lineno"> 352</span>  <span class="comment">/* within range of fitted rate coefficients */</span></div> <div class="line"><a name="l00353"></a><span class="lineno"> 353</span>  <span class="keywordtype">double</span> <a class="code" href="atmdat__3body_8cpp.html#a984eb8f4ba5548d469ca2bdb3b3a9efc">x1</a>,<a class="code" href="atmdat__3body_8cpp.html#a4e6fc9d0607252ddfb72801404159738">x2</a>,x3,x4;</div> <div class="line"><a name="l00354"></a><span class="lineno"> 354</span>  x1 = temp;</div> <div class="line"><a name="l00355"></a><span class="lineno"> 355</span>  x2 = temp*temp;</div> <div class="line"><a name="l00356"></a><span class="lineno"> 356</span>  x3 = sqrt(temp);</div> <div class="line"><a name="l00357"></a><span class="lineno"> 357</span>  x4 = log(temp)/temp;</div> <div class="line"><a name="l00358"></a><span class="lineno"> 358</span>  hold =9.588389834316704E-11 - 5.158891920816405E-14*x1</div> <div class="line"><a name="l00359"></a><span class="lineno"> 359</span>  +5.895348443553458E-19*x2 + 2.053049602324290E-11*x3</div> <div class="line"><a name="l00360"></a><span class="lineno"> 360</span>  +9.122617940315725E-10*x4;</div> <div class="line"><a name="l00361"></a><span class="lineno"> 361</span> </div> <div class="line"><a name="l00362"></a><span class="lineno"> 362</span>  <span class="keywordflow">return</span> hold;</div> <div class="line"><a name="l00363"></a><span class="lineno"> 363</span> }</div> <div class="line"><a name="l00364"></a><span class="lineno"> 364</span> </div> <div class="line"><a name="l00365"></a><span class="lineno"> 365</span> <span class="comment">/* </span></div> <div class="line"><a name="l00366"></a><span class="lineno"> 366</span> <span class="comment"> * HyperfineCreate, HyperfineCS written July 2001</span></div> <div class="line"><a name="l00367"></a><span class="lineno"> 367</span> <span class="comment"> * William Goddard for Gary Ferland</span></div> <div class="line"><a name="l00368"></a><span class="lineno"> 368</span> <span class="comment"> * This code calculates line intensities for known</span></div> <div class="line"><a name="l00369"></a><span class="lineno"> 369</span> <span class="comment"> * hyperfine transitions.</span></div> <div class="line"><a name="l00370"></a><span class="lineno"> 370</span> <span class="comment"> */</span></div> <div class="line"><a name="l00371"></a><span class="lineno"> 371</span> </div> <div class="line"><a name="l00372"></a><span class="lineno"> 372</span> <span class="comment">/* two products, the transition structure HFLines, which contains all information for the lines,</span></div> <div class="line"><a name="l00373"></a><span class="lineno"> 373</span> <span class="comment"> * and nHFLines, the number of these lines. </span></div> <div class="line"><a name="l00374"></a><span class="lineno"> 374</span> <span class="comment"> *</span></div> <div class="line"><a name="l00375"></a><span class="lineno"> 375</span> <span class="comment"> * these are in taulines.h</span></div> <div class="line"><a name="l00376"></a><span class="lineno"> 376</span> <span class="comment"> *</span></div> <div class="line"><a name="l00377"></a><span class="lineno"> 377</span> <span class="comment"> * info to create them contained in hyperfine.dat</span></div> <div class="line"><a name="l00378"></a><span class="lineno"> 378</span> <span class="comment"> *</span></div> <div class="line"><a name="l00379"></a><span class="lineno"> 379</span> <span class="comment"> * abundances of nuclei are also in hyperfine.dat, stored in </span></div> <div class="line"><a name="l00380"></a><span class="lineno"> 380</span> <span class="comment"> */</span></div> <div class="line"><a name="l00381"></a><span class="lineno"> 381</span> </div> <div class="line"><a name="l00382"></a><span class="lineno"> 382</span> <span class="comment">/* Ion contains twelve varying temperatures, specified above, used for */</span></div> <div class="line"><a name="l00383"></a><span class="lineno"> 383</span> <span class="comment">/* calculating collision strengths. */</span> </div> <div class="line"><a name="l00384"></a><span class="lineno"><a class="line" href="struct_ion.html"> 384</a></span> <span class="keyword">typedef</span> <span class="keyword">struct </span></div> <div class="line"><a name="l00385"></a><span class="lineno"> 385</span> {</div> <div class="line"><a name="l00386"></a><span class="lineno"><a class="line" href="struct_ion.html#a673ac6dd62a1885f96dd5dcbbfbd1a5e"> 386</a></span>  <span class="keywordtype">double</span> strengths[12];</div> <div class="line"><a name="l00387"></a><span class="lineno"> 387</span> } <a class="code" href="struct_ion.html">Ion</a>;</div> <div class="line"><a name="l00388"></a><span class="lineno"> 388</span> </div> <div class="line"><a name="l00389"></a><span class="lineno"><a class="line" href="atom__hyperfine_8cpp.html#ae93e21fd8f303b9bcfa7a93c90efb3f7"> 389</a></span> <span class="keyword">static</span> <a class="code" href="struct_ion.html">Ion</a> *<a class="code" href="atom__hyperfine_8cpp.html#ae93e21fd8f303b9bcfa7a93c90efb3f7">Strengths</a>;</div> <div class="line"><a name="l00390"></a><span class="lineno"> 390</span> </div> <div class="line"><a name="l00391"></a><span class="lineno"> 391</span> <span class="comment">/* HyperfineCreate establish space for hf arrays, reads atomic data from hyperfine.dat */</span></div> <div class="line"><a name="l00392"></a><span class="lineno"><a class="line" href="hyperfine_8h.html#ad707955037e9118e2c752b99cdd0b31b"> 392</a></span> <span class="keywordtype">void</span> <a class="code" href="atom__hyperfine_8cpp.html#ad707955037e9118e2c752b99cdd0b31b">HyperfineCreate</a>(<span class="keywordtype">void</span>)</div> <div class="line"><a name="l00393"></a><span class="lineno"> 393</span> {</div> <div class="line"><a name="l00394"></a><span class="lineno"> 394</span>  FILE *ioDATA;</div> <div class="line"><a name="l00395"></a><span class="lineno"> 395</span>  <span class="keywordtype">char</span> chLine[<a class="code" href="cddefines_8h.html#a6415f41a9722e8f545db890e726a0fcb">INPUT_LINE_LENGTH</a>];</div> <div class="line"><a name="l00396"></a><span class="lineno"> 396</span>  <span class="keywordtype">bool</span> lgEOL;</div> <div class="line"><a name="l00397"></a><span class="lineno"> 397</span>  <span class="comment">/*double c, h, k, N, Ne, q12, q21, upsilon, x;*/</span></div> <div class="line"><a name="l00398"></a><span class="lineno"> 398</span>  <a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a> spin, <a class="code" href="monitor__results_8cpp.html#a7629028bdcaca41fec58cbd3baa8147a">wavelength</a>;</div> <div class="line"><a name="l00399"></a><span class="lineno"> 399</span>  <span class="keywordtype">long</span> <span class="keywordtype">int</span> i, j, mass, nelec, ion, nelem;</div> <div class="line"><a name="l00400"></a><span class="lineno"> 400</span> </div> <div class="line"><a name="l00401"></a><span class="lineno"> 401</span>  <a class="code" href="cddefines_8h.html#ada0cfa6927ba3683adc971d17643f2e5">DEBUG_ENTRY</a>( <span class="stringliteral">"HyperfineCreate()"</span> );</div> <div class="line"><a name="l00402"></a><span class="lineno"> 402</span> </div> <div class="line"><a name="l00403"></a><span class="lineno"> 403</span>  <span class="comment">/* list of ion collision strengths for the temperatures listed in table */</span></div> <div class="line"><a name="l00404"></a><span class="lineno"> 404</span>  <span class="comment">/* HFLines containing all the data in Hyperfine.dat, and transition is */</span></div> <div class="line"><a name="l00405"></a><span class="lineno"> 405</span>  <span class="comment">/* defined in cddefines.h */</span></div> <div class="line"><a name="l00406"></a><span class="lineno"> 406</span> </div> <div class="line"><a name="l00407"></a><span class="lineno"> 407</span>  <span class="comment">/*transition *HFLines;*/</span></div> <div class="line"><a name="l00408"></a><span class="lineno"> 408</span> </div> <div class="line"><a name="l00409"></a><span class="lineno"> 409</span>  <span class="comment">/* get the line data for the hyperfine lines */</span></div> <div class="line"><a name="l00410"></a><span class="lineno"> 410</span>  <span class="keywordflow">if</span>( <a class="code" href="trace_8cpp.html#a093b5dbeadd21d8c1a95fe9d23ab5b72">trace</a>.<a class="code" href="structt__trace.html#a8dda16a4d173d21317786ab5b9f440db">lgTrace</a> )</div> <div class="line"><a name="l00411"></a><span class="lineno"> 411</span>  fprintf( <a class="code" href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a>,<span class="stringliteral">" Hyperfine opening hyperfine.dat:"</span>);</div> <div class="line"><a name="l00412"></a><span class="lineno"> 412</span> </div> <div class="line"><a name="l00413"></a><span class="lineno"> 413</span>  ioDATA = <a class="code" href="cpu_8cpp.html#a365356a809aa94ee905d59cb878bba55">open_data</a>( <span class="stringliteral">"hyperfine.dat"</span>, <span class="stringliteral">"r"</span> );</div> <div class="line"><a name="l00414"></a><span class="lineno"> 414</span> </div> <div class="line"><a name="l00415"></a><span class="lineno"> 415</span>  <span class="comment">/* first line is a version number and does not count */</span></div> <div class="line"><a name="l00416"></a><span class="lineno"> 416</span>  <span class="keywordflow">if</span>( <a class="code" href="cddefines_8h.html#ad12f35eca35771fb382c08e43d573a03">read_whole_line</a>( chLine , (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(chLine) , ioDATA ) == NULL )</div> <div class="line"><a name="l00417"></a><span class="lineno"> 417</span>  {</div> <div class="line"><a name="l00418"></a><span class="lineno"> 418</span>  fprintf( <a class="code" href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a>, <span class="stringliteral">" Hyperfine could not read first line of hyperfine.dat.\n"</span>);</div> <div class="line"><a name="l00419"></a><span class="lineno"> 419</span>  <a class="code" href="cddefines_8h.html#a937636e18a3a517d1aeb2c111adb5160">cdEXIT</a>(<a class="code" href="cddefines_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a>);</div> <div class="line"><a name="l00420"></a><span class="lineno"> 420</span>  }</div> <div class="line"><a name="l00421"></a><span class="lineno"> 421</span>  <span class="comment">/* count how many lines are in the file, ignoring all lines</span></div> <div class="line"><a name="l00422"></a><span class="lineno"> 422</span> <span class="comment"> * starting with '#' */</span></div> <div class="line"><a name="l00423"></a><span class="lineno"> 423</span>  <a class="code" href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a> = 0;</div> <div class="line"><a name="l00424"></a><span class="lineno"> 424</span>  <span class="keywordflow">while</span>( <a class="code" href="cddefines_8h.html#ad12f35eca35771fb382c08e43d573a03">read_whole_line</a>( chLine , (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(chLine) , ioDATA ) != NULL )</div> <div class="line"><a name="l00425"></a><span class="lineno"> 425</span>  {</div> <div class="line"><a name="l00426"></a><span class="lineno"> 426</span>  <span class="comment">/* we want to count the lines that do not start with #</span></div> <div class="line"><a name="l00427"></a><span class="lineno"> 427</span> <span class="comment"> * since these contain data */</span></div> <div class="line"><a name="l00428"></a><span class="lineno"> 428</span>  <span class="keywordflow">if</span>( chLine[0] != <span class="charliteral">'#'</span>)</div> <div class="line"><a name="l00429"></a><span class="lineno"> 429</span>  ++<a class="code" href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a>;</div> <div class="line"><a name="l00430"></a><span class="lineno"> 430</span>  }</div> <div class="line"><a name="l00431"></a><span class="lineno"> 431</span> </div> <div class="line"><a name="l00432"></a><span class="lineno"> 432</span>  <span class="comment">/* allocate the transition HFLines array */</span></div> <div class="line"><a name="l00433"></a><span class="lineno"> 433</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>.<a class="code" href="class_transition_list.html#a20888010c67c929c5d49f2409d1813ac">resize</a>(<a class="code" href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a>);</div> <div class="line"><a name="l00434"></a><span class="lineno"> 434</span>  <a class="code" href="taulines_8cpp.html#aff27fa67031628a1154a1d6e039bdc56">AllTransitions</a>.push_back(<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>);</div> <div class="line"><a name="l00435"></a><span class="lineno"> 435</span>  <span class="comment">/* initialize array to impossible values to make sure eventually done right */</span></div> <div class="line"><a name="l00436"></a><span class="lineno"> 436</span>  <span class="keywordflow">for</span>( i=0; i< <a class="code" href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a>; ++i )</div> <div class="line"><a name="l00437"></a><span class="lineno"> 437</span>  {</div> <div class="line"><a name="l00438"></a><span class="lineno"> 438</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[i].Junk();</div> <div class="line"><a name="l00439"></a><span class="lineno"> 439</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[i].AddHiState();</div> <div class="line"><a name="l00440"></a><span class="lineno"> 440</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[i].AddLoState();</div> <div class="line"><a name="l00441"></a><span class="lineno"> 441</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[i].AddLine2Stack();</div> <div class="line"><a name="l00442"></a><span class="lineno"> 442</span>  }</div> <div class="line"><a name="l00443"></a><span class="lineno"> 443</span> </div> <div class="line"><a name="l00444"></a><span class="lineno"> 444</span>  Strengths = (<a class="code" href="struct_ion.html">Ion</a> *)<a class="code" href="cddefines_8h.html#a39581ccdcc8104b3f1b7cd4c51b33866">MALLOC</a>( (<span class="keywordtype">size_t</span>)(<a class="code" href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a>)*<span class="keyword">sizeof</span>(<a class="code" href="struct_ion.html">Ion</a>) );</div> <div class="line"><a name="l00445"></a><span class="lineno"> 445</span>  <a class="code" href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a>.<a class="code" href="structt__hyperfine.html#a2226ca57a23108ca0d277d2ce0bcf66a">HFLabundance</a> = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a> *)<a class="code" href="cddefines_8h.html#a39581ccdcc8104b3f1b7cd4c51b33866">MALLOC</a>( (<span class="keywordtype">size_t</span>)(<a class="code" href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a>)*<span class="keyword">sizeof</span>(<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>) );</div> <div class="line"><a name="l00446"></a><span class="lineno"> 446</span> </div> <div class="line"><a name="l00447"></a><span class="lineno"> 447</span>  <span class="comment">/* now rewind the file so we can read it a second time*/</span></div> <div class="line"><a name="l00448"></a><span class="lineno"> 448</span>  <span class="keywordflow">if</span>( fseek( ioDATA , 0 , SEEK_SET ) != 0 )</div> <div class="line"><a name="l00449"></a><span class="lineno"> 449</span>  {</div> <div class="line"><a name="l00450"></a><span class="lineno"> 450</span>  fprintf( <a class="code" href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a>, <span class="stringliteral">" Hyperfine could not rewind hyperfine.dat.\n"</span>);</div> <div class="line"><a name="l00451"></a><span class="lineno"> 451</span>  <a class="code" href="cddefines_8h.html#a937636e18a3a517d1aeb2c111adb5160">cdEXIT</a>(<a class="code" href="cddefines_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a>);</div> <div class="line"><a name="l00452"></a><span class="lineno"> 452</span>  }</div> <div class="line"><a name="l00453"></a><span class="lineno"> 453</span> </div> <div class="line"><a name="l00454"></a><span class="lineno"> 454</span>  <span class="comment">/* check that magic number is ok, read the line */</span></div> <div class="line"><a name="l00455"></a><span class="lineno"> 455</span>  <span class="keywordflow">if</span>( <a class="code" href="cddefines_8h.html#ad12f35eca35771fb382c08e43d573a03">read_whole_line</a>( chLine , (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(chLine) , ioDATA ) == NULL )</div> <div class="line"><a name="l00456"></a><span class="lineno"> 456</span>  {</div> <div class="line"><a name="l00457"></a><span class="lineno"> 457</span>  fprintf( <a class="code" href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a>, <span class="stringliteral">" Hyperfine could not read first line of hyperfine.dat.\n"</span>);</div> <div class="line"><a name="l00458"></a><span class="lineno"> 458</span>  <a class="code" href="cddefines_8h.html#a937636e18a3a517d1aeb2c111adb5160">cdEXIT</a>(<a class="code" href="cddefines_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a>);</div> <div class="line"><a name="l00459"></a><span class="lineno"> 459</span>  }</div> <div class="line"><a name="l00460"></a><span class="lineno"> 460</span> </div> <div class="line"><a name="l00461"></a><span class="lineno"> 461</span>  <span class="comment">/* check that magic number is ok, scan it in */</span></div> <div class="line"><a name="l00462"></a><span class="lineno"> 462</span>  i = 1;</div> <div class="line"><a name="l00463"></a><span class="lineno"> 463</span>  nelem = (long)<a class="code" href="cddefines_8h.html#a90efabc9ffbf9069ba9f9b532862ae71">FFmtRead</a>(chLine,&i,<span class="keyword">sizeof</span>(chLine),&lgEOL);</div> <div class="line"><a name="l00464"></a><span class="lineno"> 464</span>  nelec = (long)<a class="code" href="cddefines_8h.html#a90efabc9ffbf9069ba9f9b532862ae71">FFmtRead</a>(chLine,&i,<span class="keyword">sizeof</span>(chLine),&lgEOL);</div> <div class="line"><a name="l00465"></a><span class="lineno"> 465</span>  ion = (long)<a class="code" href="cddefines_8h.html#a90efabc9ffbf9069ba9f9b532862ae71">FFmtRead</a>(chLine,&i,<span class="keyword">sizeof</span>(chLine),&lgEOL);</div> <div class="line"><a name="l00466"></a><span class="lineno"> 466</span> </div> <div class="line"><a name="l00467"></a><span class="lineno"> 467</span>  {</div> <div class="line"><a name="l00468"></a><span class="lineno"> 468</span>  <span class="comment">/* the following is the set of numbers that appear at the start of hyperfine.dat 01 07 12 */</span> </div> <div class="line"><a name="l00469"></a><span class="lineno"> 469</span>  <span class="keyword">static</span> <span class="keywordtype">int</span> iYR=2, iMN=10, iDY=28;</div> <div class="line"><a name="l00470"></a><span class="lineno"> 470</span>  <span class="keywordflow">if</span>( ( nelem != iYR ) || ( nelec != iMN ) || ( ion != iDY ) )</div> <div class="line"><a name="l00471"></a><span class="lineno"> 471</span>  {</div> <div class="line"><a name="l00472"></a><span class="lineno"> 472</span>  fprintf( <a class="code" href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a>, </div> <div class="line"><a name="l00473"></a><span class="lineno"> 473</span>  <span class="stringliteral">" Hyperfine: the version of hyperfine.dat in the data directory is not the current version.\n"</span> );</div> <div class="line"><a name="l00474"></a><span class="lineno"> 474</span>  fprintf( <a class="code" href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a>, </div> <div class="line"><a name="l00475"></a><span class="lineno"> 475</span>  <span class="stringliteral">" I expected to find the number %i %i %i and got %li %li %li instead.\n"</span> ,</div> <div class="line"><a name="l00476"></a><span class="lineno"> 476</span>  iYR, iMN , iDY ,</div> <div class="line"><a name="l00477"></a><span class="lineno"> 477</span>  nelem , nelec , ion );</div> <div class="line"><a name="l00478"></a><span class="lineno"> 478</span>  fprintf( <a class="code" href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a>, <span class="stringliteral">"Here is the line image:\n==%s==\n"</span>, chLine );</div> <div class="line"><a name="l00479"></a><span class="lineno"> 479</span>  <a class="code" href="cddefines_8h.html#a937636e18a3a517d1aeb2c111adb5160">cdEXIT</a>(<a class="code" href="cddefines_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a>);</div> <div class="line"><a name="l00480"></a><span class="lineno"> 480</span>  }</div> <div class="line"><a name="l00481"></a><span class="lineno"> 481</span>  }</div> <div class="line"><a name="l00482"></a><span class="lineno"> 482</span> </div> <div class="line"><a name="l00483"></a><span class="lineno"> 483</span>  <span class="comment">/* </span></div> <div class="line"><a name="l00484"></a><span class="lineno"> 484</span> <span class="comment"> * scan the string taken from Hyperfine.dat, parsing into</span></div> <div class="line"><a name="l00485"></a><span class="lineno"> 485</span> <span class="comment"> * needed variables.</span></div> <div class="line"><a name="l00486"></a><span class="lineno"> 486</span> <span class="comment"> * nelem is the atomic number.</span></div> <div class="line"><a name="l00487"></a><span class="lineno"> 487</span> <span class="comment"> * IonStg is the ionization stage. Atom = 1, Z+ = 2, Z++ = 3, etc.</span></div> <div class="line"><a name="l00488"></a><span class="lineno"> 488</span> <span class="comment"> * Aul is used to find the einstein A in the function GetGF.</span></div> <div class="line"><a name="l00489"></a><span class="lineno"> 489</span> <span class="comment"> * most of the variables are floats.</span></div> <div class="line"><a name="l00490"></a><span class="lineno"> 490</span> <span class="comment"> */</span></div> <div class="line"><a name="l00491"></a><span class="lineno"> 491</span> </div> <div class="line"><a name="l00492"></a><span class="lineno"> 492</span>  <span class="comment">/* this will count the number of lines */</span></div> <div class="line"><a name="l00493"></a><span class="lineno"> 493</span>  j = 0;</div> <div class="line"><a name="l00494"></a><span class="lineno"> 494</span> </div> <div class="line"><a name="l00495"></a><span class="lineno"> 495</span>  <span class="keywordflow">while</span>( <a class="code" href="cddefines_8h.html#ad12f35eca35771fb382c08e43d573a03">read_whole_line</a>( chLine , (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(chLine) , ioDATA ) != NULL )</div> <div class="line"><a name="l00496"></a><span class="lineno"> 496</span>  {</div> <div class="line"><a name="l00497"></a><span class="lineno"> 497</span>  <span class="comment">/* only look at lines without '#' in first col */</span></div> <div class="line"><a name="l00498"></a><span class="lineno"> 498</span>  <span class="comment">/* make sure line in data file is < 140 char */</span></div> <div class="line"><a name="l00499"></a><span class="lineno"> 499</span>  <span class="keywordflow">if</span>( chLine[0] != <span class="charliteral">'#'</span>)</div> <div class="line"><a name="l00500"></a><span class="lineno"> 500</span>  {</div> <div class="line"><a name="l00501"></a><span class="lineno"> 501</span>  <span class="keywordtype">double</span> Aul;</div> <div class="line"><a name="l00502"></a><span class="lineno"> 502</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( j < nHFLines );</div> <div class="line"><a name="l00503"></a><span class="lineno"> 503</span> </div> <div class="line"><a name="l00504"></a><span class="lineno"> 504</span>  <span class="keywordtype">double</span> help[3];</div> <div class="line"><a name="l00505"></a><span class="lineno"> 505</span>  sscanf(chLine, <span class="stringliteral">"%li%i%le%i%le%le%le%le%le%le%le%le%le%le%le%le%le%le%le"</span>, </div> <div class="line"><a name="l00506"></a><span class="lineno"> 506</span>  &mass, </div> <div class="line"><a name="l00507"></a><span class="lineno"> 507</span>  &(*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Hi()).nelem(),</div> <div class="line"><a name="l00508"></a><span class="lineno"> 508</span>  &help[0],</div> <div class="line"><a name="l00509"></a><span class="lineno"> 509</span>  &(*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Hi()).IonStg(),</div> <div class="line"><a name="l00510"></a><span class="lineno"> 510</span>  &help[1],</div> <div class="line"><a name="l00511"></a><span class="lineno"> 511</span>  &help[2],</div> <div class="line"><a name="l00512"></a><span class="lineno"> 512</span>  &Aul,</div> <div class="line"><a name="l00513"></a><span class="lineno"> 513</span>  &Strengths[j].strengths[0],</div> <div class="line"><a name="l00514"></a><span class="lineno"> 514</span>  &Strengths[j].strengths[1],</div> <div class="line"><a name="l00515"></a><span class="lineno"> 515</span>  &Strengths[j].strengths[2],</div> <div class="line"><a name="l00516"></a><span class="lineno"> 516</span>  &Strengths[j].strengths[3],</div> <div class="line"><a name="l00517"></a><span class="lineno"> 517</span>  &Strengths[j].strengths[4],</div> <div class="line"><a name="l00518"></a><span class="lineno"> 518</span>  &Strengths[j].strengths[5],</div> <div class="line"><a name="l00519"></a><span class="lineno"> 519</span>  &Strengths[j].strengths[6],</div> <div class="line"><a name="l00520"></a><span class="lineno"> 520</span>  &Strengths[j].strengths[7],</div> <div class="line"><a name="l00521"></a><span class="lineno"> 521</span>  &Strengths[j].strengths[8],</div> <div class="line"><a name="l00522"></a><span class="lineno"> 522</span>  &Strengths[j].strengths[9],</div> <div class="line"><a name="l00523"></a><span class="lineno"> 523</span>  &Strengths[j].strengths[10],</div> <div class="line"><a name="l00524"></a><span class="lineno"> 524</span>  &Strengths[j].strengths[11]);</div> <div class="line"><a name="l00525"></a><span class="lineno"> 525</span>  spin = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>)help[0];</div> <div class="line"><a name="l00526"></a><span class="lineno"> 526</span>  <a class="code" href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a>.<a class="code" href="structt__hyperfine.html#a2226ca57a23108ca0d277d2ce0bcf66a">HFLabundance</a>[j] = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>)help[1];</div> <div class="line"><a name="l00527"></a><span class="lineno"> 527</span>  wavelength = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>)help[2];</div> <div class="line"><a name="l00528"></a><span class="lineno"> 528</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().Aul() = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>)Aul;</div> <div class="line"><a name="l00529"></a><span class="lineno"> 529</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().damp() = 1e-20f;</div> <div class="line"><a name="l00530"></a><span class="lineno"> 530</span>  (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Hi()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>() = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>) (2*(spin + .5) + 1);</div> <div class="line"><a name="l00531"></a><span class="lineno"> 531</span>  (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Lo()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>() = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>) (2*(spin - .5) + 1);</div> <div class="line"><a name="l00532"></a><span class="lineno"> 532</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].WLAng() = wavelength * 1e8f;</div> <div class="line"><a name="l00533"></a><span class="lineno"> 533</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].EnergyWN() = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>) (1. / wavelength);</div> <div class="line"><a name="l00534"></a><span class="lineno"> 534</span>  <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].<a class="code" href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">Emis</a>().gf() = (<a class="code" href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a>)(<a class="code" href="lines__service_8cpp.html#aa7ca4740aec3d8524c9f1a8c39c23238">GetGF</a>(<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Emis().Aul(), <a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].EnergyWN(), (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Hi()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>()));</div> <div class="line"><a name="l00535"></a><span class="lineno"> 535</span>  <span class="comment">/*fprintf(ioQQQ,"HFLinesss1\t%li\t%.2e\t%.2e\t%.2e\t%.2e\t%.2e\n",</span></div> <div class="line"><a name="l00536"></a><span class="lineno"> 536</span> <span class="comment"> j,HFLines[j].opacity() , HFLines[j].Emis().gf() , HFLines[j].Emis().Aul() , HFLines[j].EnergyWN,HFLines[j].Lo()->g());*/</span></div> <div class="line"><a name="l00537"></a><span class="lineno"> 537</span>  (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Lo()).nelem() = (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Hi()).nelem();</div> <div class="line"><a name="l00538"></a><span class="lineno"> 538</span>  (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Lo()).IonStg() = (*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Hi()).IonStg();</div> <div class="line"><a name="l00539"></a><span class="lineno"> 539</span> </div> <div class="line"><a name="l00540"></a><span class="lineno"> 540</span> </div> <div class="line"><a name="l00541"></a><span class="lineno"> 541</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>(<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[j].Emis().gf() > 0.);</div> <div class="line"><a name="l00542"></a><span class="lineno"> 542</span>  <span class="comment">/* increment the counter */</span></div> <div class="line"><a name="l00543"></a><span class="lineno"> 543</span>  j++;</div> <div class="line"><a name="l00544"></a><span class="lineno"> 544</span>  }</div> <div class="line"><a name="l00545"></a><span class="lineno"> 545</span> </div> <div class="line"><a name="l00546"></a><span class="lineno"> 546</span>  }</div> <div class="line"><a name="l00547"></a><span class="lineno"> 547</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( j==nHFLines );</div> <div class="line"><a name="l00548"></a><span class="lineno"> 548</span> </div> <div class="line"><a name="l00549"></a><span class="lineno"> 549</span>  <span class="comment">/* closing the file */</span></div> <div class="line"><a name="l00550"></a><span class="lineno"> 550</span>  fclose(ioDATA);</div> <div class="line"><a name="l00551"></a><span class="lineno"> 551</span> </div> <div class="line"><a name="l00552"></a><span class="lineno"> 552</span> <span class="preprocessor"># if 0</span></div> <div class="line"><a name="l00553"></a><span class="lineno"> 553</span> <span class="preprocessor"></span> <span class="comment">/* for debugging and developing only */</span></div> <div class="line"><a name="l00554"></a><span class="lineno"> 554</span>  <span class="comment">/* calculating the luminosity for each isotope */</span></div> <div class="line"><a name="l00555"></a><span class="lineno"> 555</span>  <span class="keywordflow">for</span>(i = 0; i < <a class="code" href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a>; i++)</div> <div class="line"><a name="l00556"></a><span class="lineno"> 556</span>  {</div> <div class="line"><a name="l00557"></a><span class="lineno"> 557</span>  <a class="code" href="thirdparty_8cpp.html#ab2b6b0c222cd1ce70d6a831f57241e59">N</a> = <a class="code" href="dense_8cpp.html#a61a760c32a26242e4eb24e230b3d5c57">dense</a>.<a class="code" href="structt__dense.html#a9f73720f209b1536b1d32300b52a9845">xIonDense</a>[(*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[i].Hi()).nelem()-1][(*<a class="code" href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a>[i].Hi()).IonStg()-1];</div> <div class="line"><a name="l00558"></a><span class="lineno"> 558</span>  Ne = <a class="code" href="dense_8cpp.html#a61a760c32a26242e4eb24e230b3d5c57">dense</a>.<a class="code" href="structt__dense.html#a1adb121fb092a05193c82bccf4f47bb7">eden</a>;</div> <div class="line"><a name="l00559"></a><span class="lineno"> 559</span> </div> <div class="line"><a name="l00560"></a><span class="lineno"> 560</span>  h = 6.626076e-27; <span class="comment">/* erg * sec */</span></div> <div class="line"><a name="l00561"></a><span class="lineno"> 561</span>  c = 3e10; <span class="comment">/* cm / sec */</span></div> <div class="line"><a name="l00562"></a><span class="lineno"> 562</span>  k = 1.380658e-16; <span class="comment">/* erg / K */</span></div> <div class="line"><a name="l00563"></a><span class="lineno"> 563</span> </div> <div class="line"><a name="l00564"></a><span class="lineno"> 564</span>  upsilon = <a class="code" href="atom__hyperfine_8cpp.html#ab8a00adbe9f3ac7b306ace2a8ba50c06">HyperfineCS</a>(i);</div> <div class="line"><a name="l00565"></a><span class="lineno"> 565</span>  <span class="comment">/*statistical weights must still be identified */</span></div> <div class="line"><a name="l00566"></a><span class="lineno"> 566</span>  q21 = <a class="code" href="physconst_8h.html#a796cdb5b7297519b8fe2225537e3b4ef">COLL_CONST</a> * upsilon / (<a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a83c3efba125ab61bce8a10180c7ff839">sqrte</a> * (*HFLines[i].Hi()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>());</div> <div class="line"><a name="l00567"></a><span class="lineno"> 567</span> </div> <div class="line"><a name="l00568"></a><span class="lineno"> 568</span>  q12 = (*HFLines[i].Hi()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>()/ (*HFLines[i].Lo()).<a class="code" href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a>() * q21 * exp(-1 * h * c * HFLines[i].EnergyWN / (k * <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a>)); </div> <div class="line"><a name="l00569"></a><span class="lineno"> 569</span> </div> <div class="line"><a name="l00570"></a><span class="lineno"> 570</span>  x = Ne * q12 / (HFLines[i].Emis().Aul() * (1 + Ne * q21 / HFLines[i].Aul()));</div> <div class="line"><a name="l00571"></a><span class="lineno"> 571</span>  HFLines[i].xIntensity() = <a class="code" href="thirdparty_8cpp.html#ab2b6b0c222cd1ce70d6a831f57241e59">N</a> * HFLines[i].Emis().Aul() * x / (1.0 + x) * h * c / (HFLines[i].WLAng() / 1e8);</div> <div class="line"><a name="l00572"></a><span class="lineno"> 572</span> </div> <div class="line"><a name="l00573"></a><span class="lineno"> 573</span>  }</div> <div class="line"><a name="l00574"></a><span class="lineno"> 574</span> <span class="preprocessor"># endif</span></div> <div class="line"><a name="l00575"></a><span class="lineno"> 575</span> <span class="preprocessor"></span></div> <div class="line"><a name="l00576"></a><span class="lineno"> 576</span>  <span class="keywordflow">return</span>;</div> <div class="line"><a name="l00577"></a><span class="lineno"> 577</span> }</div> <div class="line"><a name="l00578"></a><span class="lineno"> 578</span> </div> <div class="line"><a name="l00579"></a><span class="lineno"> 579</span> </div> <div class="line"><a name="l00580"></a><span class="lineno"> 580</span> <span class="comment">/*HyperfineCS returns interpolated collision strength for element nelem and ion ion */</span></div> <div class="line"><a name="l00581"></a><span class="lineno"><a class="line" href="hyperfine_8h.html#ab8a00adbe9f3ac7b306ace2a8ba50c06"> 581</a></span> <span class="keywordtype">double</span> <a class="code" href="atom__hyperfine_8cpp.html#ab8a00adbe9f3ac7b306ace2a8ba50c06">HyperfineCS</a>( <span class="keywordtype">long</span> i )</div> <div class="line"><a name="l00582"></a><span class="lineno"> 582</span> {</div> <div class="line"><a name="l00583"></a><span class="lineno"> 583</span> </div> <div class="line"><a name="l00584"></a><span class="lineno"> 584</span>  <span class="comment">/*Search HFLines to find i of ion */</span></div> <div class="line"><a name="l00585"></a><span class="lineno"> 585</span>  <span class="keywordtype">int</span> <span class="comment">/*i = 0,*/</span> j = 0;</div> <div class="line"><a name="l00586"></a><span class="lineno"> 586</span> <span class="preprocessor"># define N_TE_TABLE 12</span></div> <div class="line"><a name="l00587"></a><span class="lineno"> 587</span> <span class="preprocessor"></span> <span class="keywordtype">double</span> slope, upsilon, TemperatureTable[<a class="code" href="atom__hyperfine_8cpp.html#a0872e2c482931821a8a231dec25e548c">N_TE_TABLE</a>] = {.1e6, .15e6, .25e6, .4e6, .6e6, </div> <div class="line"><a name="l00588"></a><span class="lineno"> 588</span>  1.0e6, 1.5e6, 2.5e6, 4e6, 6e6, 10e6, 15e6};</div> <div class="line"><a name="l00589"></a><span class="lineno"> 589</span> </div> <div class="line"><a name="l00590"></a><span class="lineno"> 590</span>  <a class="code" href="cddefines_8h.html#ada0cfa6927ba3683adc971d17643f2e5">DEBUG_ENTRY</a>( <span class="stringliteral">"HyperfineCS()"</span> );</div> <div class="line"><a name="l00591"></a><span class="lineno"> 591</span> </div> <div class="line"><a name="l00592"></a><span class="lineno"> 592</span>  <span class="comment">/*while(i < nHFLines+1 && (*HFLines[i].Hi()).nelem() != nelem && (*HFLines[i].Hi()).IonStg() != ion)</span></div> <div class="line"><a name="l00593"></a><span class="lineno"> 593</span> <span class="comment"> ++i;*/</span></div> <div class="line"><a name="l00594"></a><span class="lineno"> 594</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( i >= 0. && i <= <a class="code" href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a> );</div> <div class="line"><a name="l00595"></a><span class="lineno"> 595</span> </div> <div class="line"><a name="l00596"></a><span class="lineno"> 596</span>  <span class="comment">/*j = temperature */</span></div> <div class="line"><a name="l00597"></a><span class="lineno"> 597</span>  <span class="comment">/* calculate actual cooling rate for isotope. */</span></div> <div class="line"><a name="l00598"></a><span class="lineno"> 598</span>  <span class="comment">/* The temperature-dependent collision strength must first be calculated. */</span></div> <div class="line"><a name="l00599"></a><span class="lineno"> 599</span>  <span class="comment">/* phycon.te is compared to the first, last and intermediate values of strengths[]*/</span></div> <div class="line"><a name="l00600"></a><span class="lineno"> 600</span>  <span class="comment">/* and interpolated by taking the log of the collision strength */</span></div> <div class="line"><a name="l00601"></a><span class="lineno"> 601</span>  <span class="comment">/* and temperature. */</span></div> <div class="line"><a name="l00602"></a><span class="lineno"> 602</span> </div> <div class="line"><a name="l00603"></a><span class="lineno"> 603</span>  <span class="keywordflow">if</span>( <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a> <= TemperatureTable[0])</div> <div class="line"><a name="l00604"></a><span class="lineno"> 604</span>  {</div> <div class="line"><a name="l00605"></a><span class="lineno"> 605</span>  <span class="comment">/* temperature below bounds of table */</span></div> <div class="line"><a name="l00606"></a><span class="lineno"> 606</span>  j = 0;</div> <div class="line"><a name="l00607"></a><span class="lineno"> 607</span>  slope = (log10(Strengths[i].strengths[j+1]) - log10(Strengths[i].strengths[j])) /</div> <div class="line"><a name="l00608"></a><span class="lineno"> 608</span>  (log10(TemperatureTable[j+1]) - log10(TemperatureTable[j]));</div> <div class="line"><a name="l00609"></a><span class="lineno"> 609</span>  upsilon = (log10((<a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a>)) - (log10(TemperatureTable[j])))*slope + log10(Strengths[i].strengths[j]);</div> <div class="line"><a name="l00610"></a><span class="lineno"> 610</span>  upsilon = pow(10., upsilon);</div> <div class="line"><a name="l00611"></a><span class="lineno"> 611</span>  }</div> <div class="line"><a name="l00612"></a><span class="lineno"> 612</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span>( <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a> >= TemperatureTable[<a class="code" href="atom__hyperfine_8cpp.html#a0872e2c482931821a8a231dec25e548c">N_TE_TABLE</a>-1])</div> <div class="line"><a name="l00613"></a><span class="lineno"> 613</span>  {</div> <div class="line"><a name="l00614"></a><span class="lineno"> 614</span>  <span class="comment">/* temperature above bounds of table */</span></div> <div class="line"><a name="l00615"></a><span class="lineno"> 615</span>  j = <a class="code" href="atom__hyperfine_8cpp.html#a0872e2c482931821a8a231dec25e548c">N_TE_TABLE</a> - 1;</div> <div class="line"><a name="l00616"></a><span class="lineno"> 616</span>  slope = (log10(Strengths[i].strengths[j-1]) - log10(Strengths[i].strengths[j])) /</div> <div class="line"><a name="l00617"></a><span class="lineno"> 617</span>  (log10(TemperatureTable[j-1]) - log10(TemperatureTable[j]));</div> <div class="line"><a name="l00618"></a><span class="lineno"> 618</span>  upsilon = (log10((<a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a>)) - (log10(TemperatureTable[j])))*slope + log10(Strengths[i].strengths[j]);</div> <div class="line"><a name="l00619"></a><span class="lineno"> 619</span>  upsilon = pow(10., upsilon);</div> <div class="line"><a name="l00620"></a><span class="lineno"> 620</span>  }</div> <div class="line"><a name="l00621"></a><span class="lineno"> 621</span>  <span class="keywordflow">else</span></div> <div class="line"><a name="l00622"></a><span class="lineno"> 622</span>  {</div> <div class="line"><a name="l00623"></a><span class="lineno"> 623</span>  j = 1;</div> <div class="line"><a name="l00624"></a><span class="lineno"> 624</span>  <span class="comment">/* want Table[j-1] < te < Table[j] */</span></div> <div class="line"><a name="l00625"></a><span class="lineno"> 625</span>  <span class="comment">/*while ( phycon.te >= TemperatureTable[j] && j < N_TE_TABLE )*/</span></div> <div class="line"><a name="l00626"></a><span class="lineno"> 626</span>  <span class="comment">/*while ( TemperatureTable[j] < phycon.te && j < N_TE_TABLE )*/</span></div> <div class="line"><a name="l00627"></a><span class="lineno"> 627</span>  <span class="keywordflow">while</span> ( j < <a class="code" href="atom__hyperfine_8cpp.html#a0872e2c482931821a8a231dec25e548c">N_TE_TABLE</a> && TemperatureTable[j] < <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a> )</div> <div class="line"><a name="l00628"></a><span class="lineno"> 628</span>  j++;</div> <div class="line"><a name="l00629"></a><span class="lineno"> 629</span> </div> <div class="line"><a name="l00630"></a><span class="lineno"> 630</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( j >= 0 && j < <a class="code" href="atom__hyperfine_8cpp.html#a0872e2c482931821a8a231dec25e548c">N_TE_TABLE</a>);</div> <div class="line"><a name="l00631"></a><span class="lineno"> 631</span>  <a class="code" href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a>( (TemperatureTable[j-1] <= <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a> ) && (TemperatureTable[j] >= <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a>) );</div> <div class="line"><a name="l00632"></a><span class="lineno"> 632</span> </div> <div class="line"><a name="l00633"></a><span class="lineno"> 633</span>  <span class="keywordflow">if</span>( <a class="code" href="cddefines_8h.html#abf352ab93b9855e49d54873654b521e2">fp_equal</a>( <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a>, TemperatureTable[j] ) )</div> <div class="line"><a name="l00634"></a><span class="lineno"> 634</span>  {</div> <div class="line"><a name="l00635"></a><span class="lineno"> 635</span>  upsilon = Strengths[i].<a class="code" href="struct_ion.html#a673ac6dd62a1885f96dd5dcbbfbd1a5e">strengths</a>[j];</div> <div class="line"><a name="l00636"></a><span class="lineno"> 636</span>  }</div> <div class="line"><a name="l00637"></a><span class="lineno"> 637</span>  <span class="comment">/*phycon.te must be less than TemperatureTable[j], greater than TemperatureTable[j-1][0]*/</span></div> <div class="line"><a name="l00638"></a><span class="lineno"> 638</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span>( <a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a> < TemperatureTable[j])</div> <div class="line"><a name="l00639"></a><span class="lineno"> 639</span>  {</div> <div class="line"><a name="l00640"></a><span class="lineno"> 640</span>  slope = (log10(Strengths[i].strengths[j-1]) - log10(Strengths[i].strengths[j])) /</div> <div class="line"><a name="l00641"></a><span class="lineno"> 641</span>  (log10(TemperatureTable[j-1]) - log10(TemperatureTable[j]));</div> <div class="line"><a name="l00642"></a><span class="lineno"> 642</span> </div> <div class="line"><a name="l00643"></a><span class="lineno"> 643</span>  upsilon = (log10((<a class="code" href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a>.<a class="code" href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">te</a>)) - (log10(TemperatureTable[j-1])))*slope + log10(Strengths[i].strengths[j-1]);</div> <div class="line"><a name="l00644"></a><span class="lineno"> 644</span>  upsilon = pow(10., upsilon);</div> <div class="line"><a name="l00645"></a><span class="lineno"> 645</span>  }</div> <div class="line"><a name="l00646"></a><span class="lineno"> 646</span>  <span class="keywordflow">else</span> </div> <div class="line"><a name="l00647"></a><span class="lineno"> 647</span>  {</div> <div class="line"><a name="l00648"></a><span class="lineno"> 648</span>  upsilon = Strengths[i].<a class="code" href="struct_ion.html#a673ac6dd62a1885f96dd5dcbbfbd1a5e">strengths</a>[j-1];</div> <div class="line"><a name="l00649"></a><span class="lineno"> 649</span>  }</div> <div class="line"><a name="l00650"></a><span class="lineno"> 650</span>  }</div> <div class="line"><a name="l00651"></a><span class="lineno"> 651</span> </div> <div class="line"><a name="l00652"></a><span class="lineno"> 652</span>  <span class="keywordflow">return</span> upsilon;</div> <div class="line"><a name="l00653"></a><span class="lineno"> 653</span> }</div> <div class="ttc" id="cddefines_8h_html_a393053491edc087c17e89d597b6e16f5"><div class="ttname"><a href="cddefines_8h.html#a393053491edc087c17e89d597b6e16f5">MIN2</a></div><div class="ttdeci">#define MIN2</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00765">cddefines.h:765</a></div></div> <div class="ttc" id="structt__dense_html_a53085031083ac598a3b49661acd03792"><div class="ttname"><a href="structt__dense.html#a53085031083ac598a3b49661acd03792">t_dense::cdsqte</a></div><div class="ttdeci">double cdsqte</div><div class="ttdef"><b>Definition:</b> <a href="dense_8h_source.html#l00235">dense.h:235</a></div></div> <div class="ttc" id="transition_8cpp_html_ab7b73eb6a4604a103f9538de337fec18"><div class="ttname"><a href="transition_8cpp.html#ab7b73eb6a4604a103f9538de337fec18">TexcLine</a></div><div class="ttdeci">double TexcLine(const TransitionProxy &t)</div><div class="ttdef"><b>Definition:</b> <a href="transition_8cpp_source.html#l00169">transition.cpp:169</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_adca2f00eec8250235f951d3a7f94797f"><div class="ttname"><a href="atom__hyperfine_8cpp.html#adca2f00eec8250235f951d3a7f94797f">h21_t_ge_10</a></div><div class="ttdeci">STATIC double h21_t_ge_10(double temp)</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00264">atom_hyperfine.cpp:264</a></div></div> <div class="ttc" id="cpu_8cpp_html_a365356a809aa94ee905d59cb878bba55"><div class="ttname"><a href="cpu_8cpp.html#a365356a809aa94ee905d59cb878bba55">open_data</a></div><div class="ttdeci">FILE * open_data(const char *fname, const char *mode, access_scheme scheme)</div><div class="ttdef"><b>Definition:</b> <a href="cpu_8cpp_source.html#l00616">cpu.cpp:616</a></div></div> <div class="ttc" id="trace_8h_html"><div class="ttname"><a href="trace_8h.html">trace.h</a></div></div> <div class="ttc" id="atmdat__3body_8cpp_html_a4e6fc9d0607252ddfb72801404159738"><div class="ttname"><a href="atmdat__3body_8cpp.html#a4e6fc9d0607252ddfb72801404159738">x2</a></div><div class="ttdeci">static double x2[63]</div><div class="ttdef"><b>Definition:</b> <a href="atmdat__3body_8cpp_source.html#l00018">atmdat_3body.cpp:18</a></div></div> <div class="ttc" id="struct_ion_html_a673ac6dd62a1885f96dd5dcbbfbd1a5e"><div class="ttname"><a href="struct_ion.html#a673ac6dd62a1885f96dd5dcbbfbd1a5e">Ion::strengths</a></div><div class="ttdeci">double strengths[12]</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00386">atom_hyperfine.cpp:386</a></div></div> <div class="ttc" id="classt__iso__sp_html_abed262ca9c3408aadb4a4e3e0c902172"><div class="ttname"><a href="classt__iso__sp.html#abed262ca9c3408aadb4a4e3e0c902172">t_iso_sp::st</a></div><div class="ttdeci">qList st</div><div class="ttdef"><b>Definition:</b> <a href="iso_8h_source.html#l00453">iso.h:453</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_a2de142b89b10b6e4d0385be775703f33"><div class="ttname"><a href="atom__hyperfine_8cpp.html#a2de142b89b10b6e4d0385be775703f33">h21_t_lt_10</a></div><div class="ttdeci">STATIC double h21_t_lt_10(double temp)</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00290">atom_hyperfine.cpp:290</a></div></div> <div class="ttc" id="cddefines_8h_html_ac55e0608660d9a2b8dc1cc14d7f59081"><div class="ttname"><a href="cddefines_8h.html#ac55e0608660d9a2b8dc1cc14d7f59081">TotalInsanity</a></div><div class="ttdeci">NORETURN void TotalInsanity(void)</div><div class="ttdef"><b>Definition:</b> <a href="service_8cpp_source.html#l00886">service.cpp:886</a></div></div> <div class="ttc" id="atmdat__3body_8cpp_html_a984eb8f4ba5548d469ca2bdb3b3a9efc"><div class="ttname"><a href="atmdat__3body_8cpp.html#a984eb8f4ba5548d469ca2bdb3b3a9efc">x1</a></div><div class="ttdeci">static double x1[83]</div><div class="ttdef"><b>Definition:</b> <a href="atmdat__3body_8cpp_source.html#l00027">atmdat_3body.cpp:27</a></div></div> <div class="ttc" id="hyperfine_8cpp_html_ac702275ddec2c013a7f19e9320052384"><div class="ttname"><a href="hyperfine_8cpp.html#ac702275ddec2c013a7f19e9320052384">hyperfine</a></div><div class="ttdeci">t_hyperfine hyperfine</div><div class="ttdef"><b>Definition:</b> <a href="hyperfine_8cpp_source.html#l00005">hyperfine.cpp:5</a></div></div> <div class="ttc" id="cpu_8h_html_af1d998d79044c9644b48f8d5647d57b6"><div class="ttname"><a href="cpu_8h.html#af1d998d79044c9644b48f8d5647d57b6">SMALLFLOAT</a></div><div class="ttdeci">const realnum SMALLFLOAT</div><div class="ttdef"><b>Definition:</b> <a href="cpu_8h_source.html#l00178">cpu.h:178</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_a84bbaa1457055b4266971b32037666a4"><div class="ttname"><a href="atom__hyperfine_8cpp.html#a84bbaa1457055b4266971b32037666a4">H21cm_H_atom</a></div><div class="ttdeci">double H21cm_H_atom(double temp)</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00306">atom_hyperfine.cpp:306</a></div></div> <div class="ttc" id="monitor__results_8cpp_html_a7629028bdcaca41fec58cbd3baa8147a"><div class="ttname"><a href="monitor__results_8cpp.html#a7629028bdcaca41fec58cbd3baa8147a">wavelength</a></div><div class="ttdeci">static realnum * wavelength</div><div class="ttdef"><b>Definition:</b> <a href="monitor__results_8cpp_source.html#l00070">monitor_results.cpp:70</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_ae93e21fd8f303b9bcfa7a93c90efb3f7"><div class="ttname"><a href="atom__hyperfine_8cpp.html#ae93e21fd8f303b9bcfa7a93c90efb3f7">Strengths</a></div><div class="ttdeci">static Ion * Strengths</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00389">atom_hyperfine.cpp:389</a></div></div> <div class="ttc" id="thirdparty_8cpp_html_ab2b6b0c222cd1ce70d6a831f57241e59"><div class="ttname"><a href="thirdparty_8cpp.html#ab2b6b0c222cd1ce70d6a831f57241e59">N</a></div><div class="ttdeci">static const int N</div><div class="ttdef"><b>Definition:</b> <a href="thirdparty_8cpp_source.html#l02814">thirdparty.cpp:2814</a></div></div> <div class="ttc" id="cddefines_8h_html_aa0c19e95ba3c1d759e15a79a136ce3c6"><div class="ttname"><a href="cddefines_8h.html#aa0c19e95ba3c1d759e15a79a136ce3c6">MAX2</a></div><div class="ttdeci">#define MAX2</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00786">cddefines.h:786</a></div></div> <div class="ttc" id="conv_8cpp_html_a02aae728cb00079244fd6d41fefdc959"><div class="ttname"><a href="conv_8cpp.html#a02aae728cb00079244fd6d41fefdc959">conv</a></div><div class="ttdeci">t_conv conv</div><div class="ttdef"><b>Definition:</b> <a href="conv_8cpp_source.html#l00005">conv.cpp:5</a></div></div> <div class="ttc" id="taulines_8cpp_html_a56fc742960b578fc1a8f23bf9ff27f57"><div class="ttname"><a href="taulines_8cpp.html#a56fc742960b578fc1a8f23bf9ff27f57">HFLines</a></div><div class="ttdeci">TransitionList HFLines("HFLines",&AnonStates)</div></div> <div class="ttc" id="phycon_8cpp_html_a58e7356b28193ac2b0ee8b08f06939ba"><div class="ttname"><a href="phycon_8cpp.html#a58e7356b28193ac2b0ee8b08f06939ba">phycon</a></div><div class="ttdeci">t_phycon phycon</div><div class="ttdef"><b>Definition:</b> <a href="phycon_8cpp_source.html#l00006">phycon.cpp:6</a></div></div> <div class="ttc" id="dense_8cpp_html_a61a760c32a26242e4eb24e230b3d5c57"><div class="ttname"><a href="dense_8cpp.html#a61a760c32a26242e4eb24e230b3d5c57">dense</a></div><div class="ttdeci">t_dense dense</div><div class="ttdef"><b>Definition:</b> <a href="dense_8cpp_source.html#l00024">dense.cpp:24</a></div></div> <div class="ttc" id="physconst_8h_html_a796cdb5b7297519b8fe2225537e3b4ef"><div class="ttname"><a href="physconst_8h.html#a796cdb5b7297519b8fe2225537e3b4ef">COLL_CONST</a></div><div class="ttdeci">const double COLL_CONST</div><div class="ttdef"><b>Definition:</b> <a href="physconst_8h_source.html#l00229">physconst.h:229</a></div></div> <div class="ttc" id="phycon_8h_html"><div class="ttname"><a href="phycon_8h.html">phycon.h</a></div></div> <div class="ttc" id="cddefines_8h_html_a0949cd6050ce9bd2506528396ef7424f"><div class="ttname"><a href="cddefines_8h.html#a0949cd6050ce9bd2506528396ef7424f">sexp</a></div><div class="ttdeci">sys_float sexp(sys_float x)</div><div class="ttdef"><b>Definition:</b> <a href="service_8cpp_source.html#l00914">service.cpp:914</a></div></div> <div class="ttc" id="species2_8cpp_html_a6a53680399f0706f259b732761169657"><div class="ttname"><a href="species2_8cpp.html#a6a53680399f0706f259b732761169657">g</a></div><div class="ttdeci">static double * g</div><div class="ttdef"><b>Definition:</b> <a href="species2_8cpp_source.html#l00028">species2.cpp:28</a></div></div> <div class="ttc" id="cddefines_8cpp_html_a94bc49f6569c17375ac7fbf6a66f6dd0"><div class="ttname"><a href="cddefines_8cpp.html#a94bc49f6569c17375ac7fbf6a66f6dd0">ioQQQ</a></div><div class="ttdeci">FILE * ioQQQ</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8cpp_source.html#l00007">cddefines.cpp:7</a></div></div> <div class="ttc" id="dense_8h_html"><div class="ttname"><a href="dense_8h.html">dense.h</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_ad707955037e9118e2c752b99cdd0b31b"><div class="ttname"><a href="atom__hyperfine_8cpp.html#ad707955037e9118e2c752b99cdd0b31b">HyperfineCreate</a></div><div class="ttdeci">void HyperfineCreate(void)</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00392">atom_hyperfine.cpp:392</a></div></div> <div class="ttc" id="structt__dense_html_a9f73720f209b1536b1d32300b52a9845"><div class="ttname"><a href="structt__dense.html#a9f73720f209b1536b1d32300b52a9845">t_dense::xIonDense</a></div><div class="ttdeci">double xIonDense[LIMELM][LIMELM+1]</div><div class="ttdef"><b>Definition:</b> <a href="dense_8h_source.html#l00125">dense.h:125</a></div></div> <div class="ttc" id="hyperfine_8h_html"><div class="ttname"><a href="hyperfine_8h.html">hyperfine.h</a></div></div> <div class="ttc" id="iso_8cpp_html_ab57c2051ee65e0236231a59103b5e80c"><div class="ttname"><a href="iso_8cpp.html#ab57c2051ee65e0236231a59103b5e80c">iso_sp</a></div><div class="ttdeci">t_iso_sp iso_sp[NISO][LIMELM]</div><div class="ttdef"><b>Definition:</b> <a href="iso_8cpp_source.html#l00008">iso.cpp:8</a></div></div> <div class="ttc" id="species2_8cpp_html_a1662e9eebf1c47ea5772bd18d77a5f15"><div class="ttname"><a href="species2_8cpp.html#a1662e9eebf1c47ea5772bd18d77a5f15">col_str</a></div><div class="ttdeci">static double ** col_str</div><div class="ttdef"><b>Definition:</b> <a href="species2_8cpp_source.html#l00029">species2.cpp:29</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_aa0b5438e6787e8702634ac7b4cd5005a"><div class="ttname"><a href="atom__hyperfine_8cpp.html#aa0b5438e6787e8702634ac7b4cd5005a">H21cm_proton</a></div><div class="ttdeci">double H21cm_proton(double temp)</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00323">atom_hyperfine.cpp:323</a></div></div> <div class="ttc" id="structt__conv_html_af927d37582560e64e2a55704f18aab0b"><div class="ttname"><a href="structt__conv.html#af927d37582560e64e2a55704f18aab0b">t_conv::lgSearch</a></div><div class="ttdeci">bool lgSearch</div><div class="ttdef"><b>Definition:</b> <a href="conv_8h_source.html#l00175">conv.h:175</a></div></div> <div class="ttc" id="trace_8cpp_html_a093b5dbeadd21d8c1a95fe9d23ab5b72"><div class="ttname"><a href="trace_8cpp.html#a093b5dbeadd21d8c1a95fe9d23ab5b72">trace</a></div><div class="ttdeci">t_trace trace</div><div class="ttdef"><b>Definition:</b> <a href="trace_8cpp_source.html#l00005">trace.cpp:5</a></div></div> <div class="ttc" id="cddefines_8h_html_abf352ab93b9855e49d54873654b521e2"><div class="ttname"><a href="cddefines_8h.html#abf352ab93b9855e49d54873654b521e2">fp_equal</a></div><div class="ttdeci">bool fp_equal(sys_float x, sys_float y, int n=3)</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00816">cddefines.h:816</a></div></div> <div class="ttc" id="cddefines_8h_html_a39581ccdcc8104b3f1b7cd4c51b33866"><div class="ttname"><a href="cddefines_8h.html#a39581ccdcc8104b3f1b7cd4c51b33866">MALLOC</a></div><div class="ttdeci">#define MALLOC(exp)</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00505">cddefines.h:505</a></div></div> <div class="ttc" id="lines__service_8h_html"><div class="ttname"><a href="lines__service_8h.html">lines_service.h</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_a33952f082dfc1cd8667a512b332e915f"><div class="ttname"><a href="atom__hyperfine_8cpp.html#a33952f082dfc1cd8667a512b332e915f">H21cm_electron</a></div><div class="ttdeci">double H21cm_electron(double temp)</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00206">atom_hyperfine.cpp:206</a></div></div> <div class="ttc" id="taulines_8h_html"><div class="ttname"><a href="taulines_8h.html">taulines.h</a></div></div> <div class="ttc" id="class_transition_list_html_a20888010c67c929c5d49f2409d1813ac"><div class="ttname"><a href="class_transition_list.html#a20888010c67c929c5d49f2409d1813ac">TransitionList::resize</a></div><div class="ttdeci">void resize(size_t newsize)</div><div class="ttdef"><b>Definition:</b> <a href="transition_8h_source.html#l00285">transition.h:285</a></div></div> <div class="ttc" id="iso_8h_html_a1c4a2ccd8a77c449fcf2ec2eb4561c22"><div class="ttname"><a href="iso_8h.html#a1c4a2ccd8a77c449fcf2ec2eb4561c22">ipH1s</a></div><div class="ttdeci">const int ipH1s</div><div class="ttdef"><b>Definition:</b> <a href="iso_8h_source.html#l00027">iso.h:27</a></div></div> <div class="ttc" id="cddefines_8h_html_a10b2d890d871e1489bb02b7e70d9bdfb"><div class="ttname"><a href="cddefines_8h.html#a10b2d890d871e1489bb02b7e70d9bdfb">STATIC</a></div><div class="ttdeci">#define STATIC</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00101">cddefines.h:101</a></div></div> <div class="ttc" id="structt__trace_html_a8dda16a4d173d21317786ab5b9f440db"><div class="ttname"><a href="structt__trace.html#a8dda16a4d173d21317786ab5b9f440db">t_trace::lgTrace</a></div><div class="ttdeci">bool lgTrace</div><div class="ttdef"><b>Definition:</b> <a href="trace_8h_source.html#l00012">trace.h:12</a></div></div> <div class="ttc" id="iso_8h_html"><div class="ttname"><a href="iso_8h.html">iso.h</a></div></div> <div class="ttc" id="rfield_8cpp_html_ae577590833d90679b27a7e2b237ee667"><div class="ttname"><a href="rfield_8cpp.html#ae577590833d90679b27a7e2b237ee667">rfield</a></div><div class="ttdeci">t_rfield rfield</div><div class="ttdef"><b>Definition:</b> <a href="rfield_8cpp_source.html#l00008">rfield.cpp:8</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_ab8a00adbe9f3ac7b306ace2a8ba50c06"><div class="ttname"><a href="atom__hyperfine_8cpp.html#ab8a00adbe9f3ac7b306ace2a8ba50c06">HyperfineCS</a></div><div class="ttdeci">double HyperfineCS(long i)</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00581">atom_hyperfine.cpp:581</a></div></div> <div class="ttc" id="physconst_8h_html_a93f822e34d056465aab7d7a6d115709c"><div class="ttname"><a href="physconst_8h.html#a93f822e34d056465aab7d7a6d115709c">T1CM</a></div><div class="ttdeci">const double T1CM</div><div class="ttdef"><b>Definition:</b> <a href="physconst_8h_source.html#l00167">physconst.h:167</a></div></div> <div class="ttc" id="cddefines_8h_html_a9aeda5ccf905f7d5241c0fe35434c820"><div class="ttname"><a href="cddefines_8h.html#a9aeda5ccf905f7d5241c0fe35434c820">realnum</a></div><div class="ttdeci">float realnum</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00107">cddefines.h:107</a></div></div> <div class="ttc" id="cddefines_8h_html_a73efe787c131b385070f25d18b7c9aa4"><div class="ttname"><a href="cddefines_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a></div><div class="ttdeci">#define EXIT_FAILURE</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00144">cddefines.h:144</a></div></div> <div class="ttc" id="cddefines_8h_html_a6415f41a9722e8f545db890e726a0fcb"><div class="ttname"><a href="cddefines_8h.html#a6415f41a9722e8f545db890e726a0fcb">INPUT_LINE_LENGTH</a></div><div class="ttdeci">const int INPUT_LINE_LENGTH</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00258">cddefines.h:258</a></div></div> <div class="ttc" id="cddefines_8h_html_a937636e18a3a517d1aeb2c111adb5160"><div class="ttname"><a href="cddefines_8h.html#a937636e18a3a517d1aeb2c111adb5160">cdEXIT</a></div><div class="ttdeci">#define cdEXIT(FAIL)</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00438">cddefines.h:438</a></div></div> <div class="ttc" id="conv_8h_html"><div class="ttname"><a href="conv_8h.html">conv.h</a></div></div> <div class="ttc" id="structt__rfield_html_ac936125b75f9726c50fa0b11ccb6ea19"><div class="ttname"><a href="structt__rfield.html#ac936125b75f9726c50fa0b11ccb6ea19">t_rfield::ContBoltz</a></div><div class="ttdeci">double * ContBoltz</div><div class="ttdef"><b>Definition:</b> <a href="rfield_8h_source.html#l00145">rfield.h:145</a></div></div> <div class="ttc" id="struct_ion_html"><div class="ttname"><a href="struct_ion.html">Ion</a></div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00384">atom_hyperfine.cpp:384</a></div></div> <div class="ttc" id="iso_8h_html_a63acd79d87d47a44d38d8cc1b4239c48"><div class="ttname"><a href="iso_8h.html#a63acd79d87d47a44d38d8cc1b4239c48">ipH2p</a></div><div class="ttdeci">const int ipH2p</div><div class="ttdef"><b>Definition:</b> <a href="iso_8h_source.html#l00029">iso.h:29</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_a0872e2c482931821a8a231dec25e548c"><div class="ttname"><a href="atom__hyperfine_8cpp.html#a0872e2c482931821a8a231dec25e548c">N_TE_TABLE</a></div><div class="ttdeci">#define N_TE_TABLE</div></div> <div class="ttc" id="cddefines_8h_html_a092bd7bb2cb7fd9f483b6995cee61bc0"><div class="ttname"><a href="cddefines_8h.html#a092bd7bb2cb7fd9f483b6995cee61bc0">ASSERT</a></div><div class="ttdeci">#define ASSERT(exp)</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00582">cddefines.h:582</a></div></div> <div class="ttc" id="transition_8cpp_html_a8d1af23d2cba9e8d212f9d321d6009cb"><div class="ttname"><a href="transition_8cpp.html#a8d1af23d2cba9e8d212f9d321d6009cb">OccupationNumberLine</a></div><div class="ttdeci">double OccupationNumberLine(const TransitionProxy &t)</div><div class="ttdef"><b>Definition:</b> <a href="transition_8cpp_source.html#l00142">transition.cpp:142</a></div></div> <div class="ttc" id="structt__hyperfine_html_abbcbbc39d2f4af53a664ba8d4a7f4d64"><div class="ttname"><a href="structt__hyperfine.html#abbcbbc39d2f4af53a664ba8d4a7f4d64">t_hyperfine::Tspin21cm</a></div><div class="ttdeci">double Tspin21cm</div><div class="ttdef"><b>Definition:</b> <a href="hyperfine_8h_source.html#l00047">hyperfine.h:47</a></div></div> <div class="ttc" id="lines__service_8cpp_html_aa7ca4740aec3d8524c9f1a8c39c23238"><div class="ttname"><a href="lines__service_8cpp.html#aa7ca4740aec3d8524c9f1a8c39c23238">GetGF</a></div><div class="ttdeci">double GetGF(double trans_prob, double enercm, double gup)</div><div class="ttdef"><b>Definition:</b> <a href="lines__service_8cpp_source.html#l00101">lines_service.cpp:101</a></div></div> <div class="ttc" id="iso_8h_html_ac9adcc2e25a84dbcfaf67a9753504f29"><div class="ttname"><a href="iso_8h.html#ac9adcc2e25a84dbcfaf67a9753504f29">ipH_LIKE</a></div><div class="ttdeci">const int ipH_LIKE</div><div class="ttdef"><b>Definition:</b> <a href="iso_8h_source.html#l00062">iso.h:62</a></div></div> <div class="ttc" id="cddefines_8h_html"><div class="ttname"><a href="cddefines_8h.html">cddefines.h</a></div></div> <div class="ttc" id="cddefines_8h_html_a34a972cf4be2379a5ee363b82d623b3a"><div class="ttname"><a href="cddefines_8h.html#a34a972cf4be2379a5ee363b82d623b3a">pow2</a></div><div class="ttdeci">T pow2(T a)</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00935">cddefines.h:935</a></div></div> <div class="ttc" id="cddefines_8h_html_ada0cfa6927ba3683adc971d17643f2e5"><div class="ttname"><a href="cddefines_8h.html#ada0cfa6927ba3683adc971d17643f2e5">DEBUG_ENTRY</a></div><div class="ttdeci">#define DEBUG_ENTRY(funcname)</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00688">cddefines.h:688</a></div></div> <div class="ttc" id="structt__hyperfine_html_a143e00775caee84acb615181a28c320f"><div class="ttname"><a href="structt__hyperfine.html#a143e00775caee84acb615181a28c320f">t_hyperfine::lgLya_pump_21cm</a></div><div class="ttdeci">bool lgLya_pump_21cm</div><div class="ttdef"><b>Definition:</b> <a href="hyperfine_8h_source.html#l00050">hyperfine.h:50</a></div></div> <div class="ttc" id="structt__dense_html_a1adb121fb092a05193c82bccf4f47bb7"><div class="ttname"><a href="structt__dense.html#a1adb121fb092a05193c82bccf4f47bb7">t_dense::eden</a></div><div class="ttdeci">double eden</div><div class="ttdef"><b>Definition:</b> <a href="dense_8h_source.html#l00190">dense.h:190</a></div></div> <div class="ttc" id="taulines_8cpp_html_a7444e2d0b03fb3f0598a92d936bcd437"><div class="ttname"><a href="taulines_8cpp.html#a7444e2d0b03fb3f0598a92d936bcd437">nHFLines</a></div><div class="ttdeci">long int nHFLines</div><div class="ttdef"><b>Definition:</b> <a href="taulines_8cpp_source.html#l00031">taulines.cpp:31</a></div></div> <div class="ttc" id="cddefines_8h_html_ad1fdf827e851b9f69048a3ded076569b"><div class="ttname"><a href="cddefines_8h.html#ad1fdf827e851b9f69048a3ded076569b">SDIV</a></div><div class="ttdeci">sys_float SDIV(sys_float x)</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00956">cddefines.h:956</a></div></div> <div class="ttc" id="taulines_8cpp_html_aff27fa67031628a1154a1d6e039bdc56"><div class="ttname"><a href="taulines_8cpp.html#aff27fa67031628a1154a1d6e039bdc56">AllTransitions</a></div><div class="ttdeci">vector< TransitionList > AllTransitions</div><div class="ttdef"><b>Definition:</b> <a href="taulines_8cpp_source.html#l00008">taulines.cpp:8</a></div></div> <div class="ttc" id="cddefines_8h_html_ad12f35eca35771fb382c08e43d573a03"><div class="ttname"><a href="cddefines_8h.html#ad12f35eca35771fb382c08e43d573a03">read_whole_line</a></div><div class="ttdeci">char * read_whole_line(char *chLine, int nChar, FILE *ioIN)</div><div class="ttdef"><b>Definition:</b> <a href="service_8cpp_source.html#l00070">service.cpp:70</a></div></div> <div class="ttc" id="structt__phycon_html_a83c3efba125ab61bce8a10180c7ff839"><div class="ttname"><a href="structt__phycon.html#a83c3efba125ab61bce8a10180c7ff839">t_phycon::sqrte</a></div><div class="ttdeci">double sqrte</div><div class="ttdef"><b>Definition:</b> <a href="phycon_8h_source.html#l00048">phycon.h:48</a></div></div> <div class="ttc" id="rfield_8h_html"><div class="ttname"><a href="rfield_8h.html">rfield.h</a></div></div> <div class="ttc" id="physconst_8h_html"><div class="ttname"><a href="physconst_8h.html">physconst.h</a></div></div> <div class="ttc" id="structt__phycon_html_a38484680d6075e5c0ba33fab1e514fee"><div class="ttname"><a href="structt__phycon.html#a38484680d6075e5c0ba33fab1e514fee">t_phycon::te</a></div><div class="ttdeci">double te</div><div class="ttdef"><b>Definition:</b> <a href="phycon_8h_source.html#l00011">phycon.h:11</a></div></div> <div class="ttc" id="cddefines_8h_html_ad230dc2b848c4445597e35b10e37bb74"><div class="ttname"><a href="cddefines_8h.html#ad230dc2b848c4445597e35b10e37bb74">ipHYDROGEN</a></div><div class="ttdeci">const int ipHYDROGEN</div><div class="ttdef"><b>Definition:</b> <a href="cddefines_8h_source.html#l00309">cddefines.h:309</a></div></div> <div class="ttc" id="atom__hyperfine_8cpp_html_ad2805dabda6ce26fb9bdd2001cf3757b"><div class="ttname"><a href="atom__hyperfine_8cpp.html#ad2805dabda6ce26fb9bdd2001cf3757b">H21_cm_pops</a></div><div class="ttdeci">void H21_cm_pops(void)</div><div class="ttdef"><b>Definition:</b> <a href="atom__hyperfine_8cpp_source.html#l00025">atom_hyperfine.cpp:25</a></div></div> <div class="ttc" id="class_transition_list_html_a42de1225cdfcb4f2709a6e9360fe0d60"><div class="ttname"><a href="class_transition_list.html#a42de1225cdfcb4f2709a6e9360fe0d60">TransitionList::Emis</a></div><div class="ttdeci">EmissionList & Emis()</div><div class="ttdef"><b>Definition:</b> <a href="transition_8h_source.html#l00329">transition.h:329</a></div></div> <div class="ttc" id="cddefines_8h_html_a90efabc9ffbf9069ba9f9b532862ae71"><div class="ttname"><a href="cddefines_8h.html#a90efabc9ffbf9069ba9f9b532862ae71">FFmtRead</a></div><div class="ttdeci">double FFmtRead(const char *chCard, long int *ipnt, long int last, bool *lgEOL)</div><div class="ttdef"><b>Definition:</b> <a href="service_8cpp_source.html#l00381">service.cpp:381</a></div></div> <div class="ttc" id="structt__hyperfine_html_a2226ca57a23108ca0d277d2ce0bcf66a"><div class="ttname"><a href="structt__hyperfine.html#a2226ca57a23108ca0d277d2ce0bcf66a">t_hyperfine::HFLabundance</a></div><div class="ttdeci">realnum * HFLabundance</div><div class="ttdef"><b>Definition:</b> <a href="hyperfine_8h_source.html#l00044">hyperfine.h:44</a></div></div> </div><!-- fragment --></div><!-- contents --> <!-- start footer part --> <hr class="footer"/><address class="footer"><small> Generated on Sat Oct 19 2013 10:43:44 for cloudy by  <a href="http://www.doxygen.org/index.html"> <img class="footer" src="doxygen.png" alt="doxygen"/> </a> 1.8.5 </small></address> </body> </html>