cloudy trunk
Loading...
Searching...
No Matches
cool_pota.cpp
Go to the documentation of this file.
1/* This file is part of Cloudy and is copyright (C)1978-2013 by Gary J. Ferland and
2 * others. For conditions of distribution and use see copyright notice in license.txt */
3/*CoolPota compute potassium cooling */
4#include "cddefines.h"
5#include "taulines.h"
6#include "phycon.h"
7#include "lines_service.h"
8#include "atoms.h"
9#include "cooling.h"
10
11void CoolPota(void)
12{
13 double cs;
14
15 DEBUG_ENTRY( "CoolPota()" );
16
17 /* potasium lines
18 * KI 7745 */
19 cs = 7.231e-4*phycon.te*phycon.te03*phycon.te02;
22
23 /* [K III] 4.62 microns
24 * Y(ik) from
25 * >>refer k3 cs Pelan, J., & Berrington, K.A. 1995, A&A Suppl, 110, 209 */
28
29 /* [KIV] 5.983, 15.39 mic, cs from
30 * >>refer k4 cs Galavis, M.E., Mendoza, C., & Zeippen, C.J. 1995, A&AS, 111, 347 */
33 PutCS(1.3,*TauDummy);
34 /* atom_level3( t10,t21,t20) */
36
37 /* [K VII] 3.189 microns cs from
38 * >>refer k7 cs Saraph, H.E., & Storey, P.J. A&AS, 115, 151 */
41
42 return;
43}
long ipxK03462
long ipxK04598
long ipKI7745
long ipxK07319
long ipxK04154
void atom_level2(const TransitionProxy &t)
void atom_level3(const TransitionProxy &t10, const TransitionProxy &t21, const TransitionProxy &t20)
#define DEBUG_ENTRY(funcname)
Definition cddefines.h:684
void CoolPota(void)
Definition cool_pota.cpp:11
t_phycon phycon
Definition phycon.cpp:6
TransitionProxy::iterator TauDummy
Definition taulines.cpp:60
TransitionList TauLines("TauLines", &AnonStates)
void PutCS(double cs, const TransitionProxy &t)