Changeset 1916 for branches/c08_branch/source/init_sim_postparse.cpp

Timestamp:

04/04/08 03:02:50 (9 months ago)

Author:

gary

Message:

merge of r1913-1915 on mainline

Files:

• branches/c08_branch/source/init_sim_postparse.cpp (modified) (2 diffs)

branches/c08_branch/source/init_sim_postparse.cpp

@@ -5 +5 @@
 #include "cddefines.h" 
 #include "dense.h"
+#include "elementnames.h"
 #include "physconst.h"
 #include "mole.h"
@@ -78 +79 @@
         }
 
+        if( iso.lgPrintNumberOfLevels )
+        {
+                fprintf(ioQQQ,"\n\n Number of levels in ions treated by iso sequences.\n");
+                fprintf(ioQQQ," ISO   Element  hi-n(l-resolved) #(l-resolved)  n(collapsed)\n");
+                /* option to print number of levels for each element */
+                for( long ipISO=ipH_LIKE; ipISO<NISO; ++ipISO )
+                {
+                        for( long nelem=ipISO; nelem<LIMELM; ++nelem )
+                        {
+                                /* print number of levels */
+                                fprintf(ioQQQ," %s  %s    %4li            %4li           %4li \n",
+                                        iso.chISO[ipISO] ,
+                                        elementnames.chElementSym[nelem],
+                                        iso.n_HighestResolved_max[ipISO][nelem],
+                                        iso.numLevels_max[ipISO][nelem]-iso.nCollapsed_max[ipISO][nelem],
+                                        iso.nCollapsed_max[ipISO][nelem]);
+                        }
+                }
+        }
+
         return;
 }