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

[walter at geodynamics.org]

Author: walter
Date: 2007-03-15 13:45:19 -0700 (Thu, 15 Mar 2007)
New Revision: 6267

Modified:
   long/3D/Gale/trunk/
   long/3D/Gale/trunk/src/Underworld/plugins/Output/VTKOutput/VTKOutput.c
Log:
 r1694 at earth:  boo | 2007-03-15 13:35:25 -0700
 Make VTKOutput output to multiple files in parallel



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

Modified: long/3D/Gale/trunk/src/Underworld/plugins/Output/VTKOutput/VTKOutput.c
===================================================================
--- long/3D/Gale/trunk/src/Underworld/plugins/Output/VTKOutput/VTKOutput.c	2007-03-15 20:43:19 UTC (rev 6266)
+++ long/3D/Gale/trunk/src/Underworld/plugins/Output/VTKOutput/VTKOutput.c	2007-03-15 20:45:19 UTC (rev 6267)
@@ -114,15 +114,21 @@
         Rheology_Register*      rheology_register;
 
         Name filename;
+        int myRank;
+        MPI_Comm comm;
         Stream*           stream;
 
         Rheology_Index      rheology_I; 
         Rheology_Index      rheologyCount;
         YieldRheology*      rheology; 
 
+        comm=CommTopology_GetComm( Mesh_GetCommTopology(picswarm->mesh,
+                                                        MT_VERTEX));
+	MPI_Comm_rank( comm, (int*)&myRank );
+
         stream = Journal_Register( MPIStream_Type, Swarm_Type );
-        Stg_asprintf( &filename, "%s/particles.%05d.vtk", outputPath,
-                      timeStep);
+        Stg_asprintf( &filename, "%s/particles.%d.%05d.vtk", outputPath,
+                      myRank, timeStep);
         Stream_RedirectFile( stream, filename );
         
         /* Write a header */