cloudy: /home66/gary/public_html/cloudy/c08_branch/source/cool

00001 /* This file is part of Cloudy and is copyright (C)1978-2008 by Gary J. Ferland and
00002  * others.  For conditions of distribution and use see copyright notice in license.txt */
00003 /*CoolCoba compute cobalt cooling */
00004 #include "cddefines.h"
00005 #include "taulines.h"
00006 #include "lines_service.h"
00007 #include "cooling.h"
00008 #include "atoms.h"
00009 
00010 void CoolCoba(void)
00011 {
00012 
00013         DEBUG_ENTRY( "CoolCoba()" );
00014 
00015         /* [Co XI] 5168.A
00016          * Y(ik) from 
00017          *  >>refer     co11    as      Pelan, J., & Berrington, K.A. 1995, A&A Suppl, 110, 209 */
00018         PutCS(1.36, &TauLines[ipCo11527]);
00019         atom_level2( &TauLines[ipCo11527]);
00020         return;
00021 }

/home66/gary/public_html/cloudy/c08_branch/source/cool_coba.cpp