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

[tan2 at geodynamics.org]

Author: tan2
Date: 2007-10-17 11:36:29 -0700 (Wed, 17 Oct 2007)
New Revision: 8125

Modified:
   mc/3D/CitcomS/trunk/lib/Global_operations.c
Log:
Fixed a bug in remove_rigid_rot()

Modified: mc/3D/CitcomS/trunk/lib/Global_operations.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Global_operations.c	2007-10-17 18:35:03 UTC (rev 8124)
+++ mc/3D/CitcomS/trunk/lib/Global_operations.c	2007-10-17 18:36:29 UTC (rev 8125)
@@ -826,7 +826,7 @@
             f = E->eco[m][e].centre[2];
             r = E->eco[m][e].centre[3];
 
-            velo_from_element(E,VV,m,e,sphere_key);
+            velo_from_element_d(E,VV,m,e,sphere_key);
 
             for (j=1;j<=ppts;j++)   {
                 vx[j] = 0.0;