[cig-commits] [commit] rajesh-petsc-schur: Bug fix: missing for loop parenthesis in Construc_arrays.c (e0156af)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Wed Nov 5 19:12:41 PST 2014
Repository : https://github.com/geodynamics/citcoms
On branch : rajesh-petsc-schur
Link : https://github.com/geodynamics/citcoms/compare/464e1b32299b15819f93efd98d969cddb84dfe51...f97ae655a50bdbd6dac1923a3471ee4dae178fbd
>---------------------------------------------------------------
commit e0156afd906eb87484f9447eb7749ff2d7576765
Author: Rajesh Kommu <rajesh.kommu at gmail.com>
Date: Wed Sep 24 10:05:55 2014 -0700
Bug fix: missing for loop parenthesis in Construc_arrays.c
>---------------------------------------------------------------
e0156afd906eb87484f9447eb7749ff2d7576765
lib/Construct_arrays.c | 19 ++-----------------
1 file changed, 2 insertions(+), 17 deletions(-)
diff --git a/lib/Construct_arrays.c b/lib/Construct_arrays.c
index 11e1e72..a9995a6 100644
--- a/lib/Construct_arrays.c
+++ b/lib/Construct_arrays.c
@@ -516,7 +516,7 @@ void construct_masks(E) /* Add lid/edge masks/nodal weightings */
int i,j,k,l,node,el,elt;
int lev,elx,elz,ely,nno,nox,noz,noy;
- for(lev=E->mesh.gridmax;lev>=E->mesh.gridmin;lev--)
+ for(lev=E->mesh.gridmax;lev>=E->mesh.gridmin;lev--) {
elz = E->lmesh.ELZ[lev];
ely = E->lmesh.ELY[lev];
noy = E->lmesh.NOY[lev];
@@ -533,22 +533,7 @@ void construct_masks(E) /* Add lid/edge masks/nodal weightings */
node = E->parallel.NODE[lev][CPPR][i].bound[6];
E->NODE[lev][node] = E->NODE[lev][node] | TZEDGE;
}
-
-
-/* if (E->control.verbose) { */
-/* for(lev=E->mesh.gridmax;lev>=E->mesh.gridmin;lev--) */
-/* for (j=1;j<=E->sphere.caps_per_proc;j++) { */
-/* for (i=1;i<=E->parallel.NUM_NNO[lev][j].bound[5];i++) { */
-/* node = E->parallel.NODE[lev][j][i].bound[5]; */
-/* fprintf(E->fp_out,"bound=5 NODE[lev=%1d][node=%3d]=%d\n",lev,node,E->NODE[lev][j][node]); */
-/* } */
-/* for (i=1;i<=E->parallel.NUM_NNO[lev][j].bound[6];i++) { */
-/* node = E->parallel.NODE[lev][j][i].bound[6]; */
-/* fprintf(E->fp_out,"bound=6 NODE[lev=%1d][node=%3d]=%d\n",lev,node,E->NODE[lev][j][node]); */
-/* } */
-/* } */
-/* fflush(E->fp_out); */
-/* } */
+ }
}
More information about the CIG-COMMITS
mailing list