[cig-commits] r13255 - mc/3D/CitcomS/trunk/lib

[tan2 at geodynamics.org]

Author: tan2
Date: 2008-11-04 13:00:01 -0800 (Tue, 04 Nov 2008)
New Revision: 13255

Modified:
   mc/3D/CitcomS/trunk/lib/Output.c
Log:
Fixed a bug in outputting comp_el

Modified: mc/3D/CitcomS/trunk/lib/Output.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Output.c	2008-11-04 16:37:35 UTC (rev 13254)
+++ mc/3D/CitcomS/trunk/lib/Output.c	2008-11-04 21:00:01 UTC (rev 13255)
@@ -542,7 +542,7 @@
         }
         fprintf(fp1,"\n");
 
-        for(i=1;i<=E->lmesh.nno;i++) {
+        for(i=1;i<=E->lmesh.nel;i++) {
             for(k=0;k<E->composition.ncomp;k++) {
                 fprintf(fp1,"%.6e ",
 			E->composition.comp_el[j][k][i]);