Changeset 2125 for branches/newmole/source/mole_h2_io.cpp

Timestamp:

06/24/08 16:39:58 (7 months ago)

Author:

rjrw

Message:

Merged from trunk r2111:2124

Files:

• branches/newmole/source/mole_h2_io.cpp (modified) (2 diffs)

branches/newmole/source/mole_h2_io.cpp

@@ -272 +272 @@
                 strcpy( punch.chPunch[punch.npunch], "H2ln" );
                 sprintf( chHeader, 
-                        "#H2 line\tEhi\tVhi\tJhi\tElo\tVlo\tJlo\twl(mic)\twl(lab)\tlog L or I\tI/Inorm\tExcit(hi, K)\tg_u h\\nu * Aul\n" );
+                        "#H2 line\tEhi\tVhi\tJhi\tElo\tVlo\tJlo\twl(mic)\twl(lab)\tlog L or I\tI/Inorm\tExcit(hi, K)\tg_u h nu * Aul\n" );
                 /* first optional number changes the threshold of weakest line to print*/
                 /* fe2thresh is intensity relative to normalization line,
@@ -2192 +2192 @@
                                                                                 /* excitation energy of upper level in K */
                                                                                 fprintf( io, "\t%.3f", energy_wn[iElecHi][iVibHi][iRotHi]*T1CM );
-                                                                                /* the product h nu * Aul */
+                                                                                /* the product g_hi h nu * Aul */
                                                                                 ASSERT( H2Lines[iElecHi][iVibHi][iRotHi][iElecLo][iVibLo][iRotLo].ipCont > 0 );
                                                                                 fprintf( io, "\t%.3e", H2Lines[iElecHi][iVibHi][iRotHi][iElecLo][iVibLo][iRotLo].Emis->Aul*