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

[becker at geodynamics.org]

Author: becker
Date: 2009-07-09 10:27:41 -0700 (Thu, 09 Jul 2009)
New Revision: 15445

Modified:
   mc/3D/CitcomS/trunk/lib/Instructions.c
Log:
Only one processor complains about removing rigid rotations while prescribing plate motions.



Modified: mc/3D/CitcomS/trunk/lib/Instructions.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Instructions.c	2009-07-08 21:50:03 UTC (rev 15444)
+++ mc/3D/CitcomS/trunk/lib/Instructions.c	2009-07-09 17:27:41 UTC (rev 15445)
@@ -757,7 +757,8 @@
     if(E->sphere.caps == 12 &&
        (E->control.remove_angular_momentum || E->control.remove_rigid_rotation) &&
        (E->mesh.topvbc || E->mesh.botvbc || E->control.side_sbcs)) {
-        fprintf(stderr,"\nWARNING: The input parameters impose boundary velocity, but also remove angular momentum/rigid rotation!\n\n");
+      if(E->parallel.me == 0)
+	 fprintf(stderr,"\nWARNING: The input parameters impose boundary velocity, but also remove angular momentum/rigid rotation!\n\n");
     }
     return;
 }