[cig-commits] [commit] rajesh-petsc-schur: Removed caps_per_proc for loops from Full_boundary_conditions.c (86bc7da)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Tue Sep 16 16:14:58 PDT 2014
Repository : https://github.com/geodynamics/citcoms
On branch : rajesh-petsc-schur
Link : https://github.com/geodynamics/citcoms/compare/400e8500968f38074f2de7627682299fce9f86bb...1bfd8478d42e61b89bc8cfc1679ae9dcc94936f5
>---------------------------------------------------------------
commit 86bc7dadd63981ce13ea9d7a8798c1193aba4e2c
Author: Rajesh Kommu <rajesh.kommu at gmail.com>
Date: Tue Sep 16 15:16:20 2014 -0700
Removed caps_per_proc for loops from Full_boundary_conditions.c
>---------------------------------------------------------------
86bc7dadd63981ce13ea9d7a8798c1193aba4e2c
lib/Full_boundary_conditions.c | 5 +----
1 file changed, 1 insertion(+), 4 deletions(-)
diff --git a/lib/Full_boundary_conditions.c b/lib/Full_boundary_conditions.c
index 9ffa4b9..ad97238 100644
--- a/lib/Full_boundary_conditions.c
+++ b/lib/Full_boundary_conditions.c
@@ -54,8 +54,7 @@ void full_velocity_boundary_conditions(E)
int j,noz,lv,k,node;
- for(lv=E->mesh.gridmax;lv>=E->mesh.gridmin;lv--)
- for (j=1;j<=E->sphere.caps_per_proc;j++) {
+ for(lv=E->mesh.gridmax;lv>=E->mesh.gridmin;lv--) {
noz = E->mesh.NOZ[lv];
if(E->mesh.topvbc != 1) { /* free slip top */
horizontal_bc(E,E->sphere.cap[CPPR].VB,noz,1,0.0,VBX,0,lv,CPPR);
@@ -149,7 +148,6 @@ void full_temperature_boundary_conditions(E)
int j,lev,noz;
lev = E->mesh.levmax;
- for (j=1;j<=E->sphere.caps_per_proc;j++) {
noz = E->mesh.noz;
if(E->mesh.toptbc == 1) {
horizontal_bc(E,E->sphere.cap[CPPR].TB,noz,3,E->control.TBCtopval,TBZ,1,lev,CPPR);
@@ -180,7 +178,6 @@ void full_temperature_boundary_conditions(E)
}
- } /* end for j */
temperatures_conform_bcs(E);
E->temperatures_conform_bcs = temperatures_conform_bcs;
More information about the CIG-COMMITS
mailing list