[cig-commits] r16161 - mc/3D/CitcomS/trunk/module/Exchanger

[tan2 at geodynamics.org]

Author: tan2
Date: 2010-01-21 13:22:46 -0800 (Thu, 21 Jan 2010)
New Revision: 16161

Modified:
   mc/3D/CitcomS/trunk/module/Exchanger/CitcomInterpolator.cc
Log:
Replaced fixed accuracy setting. Bug reported by Rob Moucha.


Modified: mc/3D/CitcomS/trunk/module/Exchanger/CitcomInterpolator.cc
===================================================================
--- mc/3D/CitcomS/trunk/module/Exchanger/CitcomInterpolator.cc	2010-01-21 20:11:11 UTC (rev 16160)
+++ mc/3D/CitcomS/trunk/module/Exchanger/CitcomInterpolator.cc	2010-01-21 21:22:46 UTC (rev 16161)
@@ -424,7 +424,7 @@
 	for(int k=0; k<DIM; k++)
 	    norm += (xt[k]-xi[k]) * (xt[k]-xi[k]);
 
-	if(norm > 1.e-10) {
+	if(norm > E->control.accuracy * E->control.accuracy) {
 	    double tshape = 0.0;
 	    for(int j=0; j<NODES_PER_ELEMENT; j++)
 		tshape += shape_[j][i];