[cig-commits] r7187 - in long/3D/Gale/trunk: . src/Underworld/plugins/Output/DumpSwarm

walter at geodynamics.org walter at geodynamics.org
Wed Jun 13 01:45:23 PDT 2007


Author: walter
Date: 2007-06-13 01:45:23 -0700 (Wed, 13 Jun 2007)
New Revision: 7187

Modified:
   long/3D/Gale/trunk/
   long/3D/Gale/trunk/src/Underworld/plugins/Output/DumpSwarm/DumpSwarm.c
Log:
 r1816 at earth:  boo | 2007-06-08 13:39:33 -0700
 In DumpSwarm, output density and alpha before the stress to make it easier to understand the output



Property changes on: long/3D/Gale/trunk
___________________________________________________________________
Name: svk:merge
   - 3a629746-de10-0410-b17b-fd6ecaaa963e:/cig:1815
   + 3a629746-de10-0410-b17b-fd6ecaaa963e:/cig:1816

Modified: long/3D/Gale/trunk/src/Underworld/plugins/Output/DumpSwarm/DumpSwarm.c
===================================================================
--- long/3D/Gale/trunk/src/Underworld/plugins/Output/DumpSwarm/DumpSwarm.c	2007-06-13 08:45:18 UTC (rev 7186)
+++ long/3D/Gale/trunk/src/Underworld/plugins/Output/DumpSwarm/DumpSwarm.c	2007-06-13 08:45:23 UTC (rev 7187)
@@ -219,12 +219,20 @@
                            (double)coord[2],separator);
           }
           /* Then print out the data */
-          fprintf(fp,"%lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf\n",
-                  yielding,separator,viscosity,separator,
-                  density,separator,alpha,separator,
-                  stress[0],separator,stress[1],separator,
-                  stress[2],separator,stress[3],separator,
-                  stress[4],separator,stress[5]);
+          if (context->dim == 2) {
+            fprintf(fp,"%lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf\n",
+                    yielding,separator,viscosity,separator,
+                    density,separator,alpha,separator,
+                    stress[0],separator,stress[1],separator,
+                    stress[2]);
+          } else {
+            fprintf(fp,"%lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf%s %lf\n",
+                    yielding,separator,viscosity,separator,
+                    density,separator,alpha,separator,
+                    stress[0],separator,stress[1],separator,
+                    stress[2],separator,stress[3],separator,
+                    stress[4],separator,stress[5]);
+          }
         }
         fclose(fp);
         Memory_Free( filename );



More information about the cig-commits mailing list