Changeset 1998

Timestamp:

08/27/09 07:55:26 (15 years ago)

Author:

seroussi

Message:

bad names for ndt

File:

• issm/trunk/src/c/parallel/steadystate_core.cpp (modified) (2 diffs)

issm/trunk/src/c/parallel/steadystate_core.cpp

@@ -42 +42 @@
         Vec dt_g=NULL;
         double ndu,nu;
-        double ndt,nt;
+        double normdt,normt;
         double eps_rel;
 
@@ -115 +115 @@
 
                         VecFree(&dt_g);VecDuplicatePatch(&dt_g,old_t_g); VecAYPX(dt_g,-1.0,t_g);
-                        VecNorm(dt_g,NORM_2,&ndu); VecNorm(old_t_g,NORM_2,&nu);
+                        VecNorm(dt_g,NORM_2,&normdt); VecNorm(old_t_g,NORM_2,&normt);
 
                                         
                         if (debug) _printf_("%-60s%g\n                                     %s%g\n                                     %s%g%s\n",
-                                          "      relative convergence criterion: velocity -> norm(du)/norm(u)=   ",ndu/nu*100," temperature -> norm(dt)/norm(t)=",ndt/nt*100," eps_rel:                        ",eps_rel*100," %");
+                                          "      relative convergence criterion: velocity -> norm(du)/norm(u)=   ",ndu/nu*100," temperature -> norm(dt)/norm(t)=",normdt/normt*100," eps_rel:                        ",eps_rel*100," %");
                 
-                        if ((ndu/nu<=eps_rel)  && (ndt/nt<=eps_rel)) converged=1;
+                        if ((ndu/nu<=eps_rel)  && (normdt/normt<=eps_rel)) converged=1;
                         else converged=0;
                 }