[cig-commits] [commit] rajesh-petsc-schur: Eliminated the 3rd argument of face_eqn_node_to_pass, which was set to the caps_per_proc loop variable (4cbe56a)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Wed Nov 5 19:08:42 PST 2014
Repository : https://github.com/geodynamics/citcoms
On branch : rajesh-petsc-schur
Link : https://github.com/geodynamics/citcoms/compare/464e1b32299b15819f93efd98d969cddb84dfe51...f97ae655a50bdbd6dac1923a3471ee4dae178fbd
>---------------------------------------------------------------
commit 4cbe56a8f8baa63c511b3e17d6deb5f79d3a7025
Author: Rajesh Kommu <rajesh.kommu at gmail.com>
Date: Wed Sep 17 16:05:47 2014 -0700
Eliminated the 3rd argument of face_eqn_node_to_pass, which was set to the caps_per_proc loop variable
>---------------------------------------------------------------
4cbe56a8f8baa63c511b3e17d6deb5f79d3a7025
lib/Full_parallel_related.c | 16 +++++++---------
1 file changed, 7 insertions(+), 9 deletions(-)
diff --git a/lib/Full_parallel_related.c b/lib/Full_parallel_related.c
index 868b04f..c5a0d43 100644
--- a/lib/Full_parallel_related.c
+++ b/lib/Full_parallel_related.c
@@ -487,7 +487,7 @@ if (E->control.verbose) {
assuming fault nodes are in the top row of processors
============================================ */
-static void face_eqn_node_to_pass(struct All_variables *, int, int, int, int);
+static void face_eqn_node_to_pass(struct All_variables *, int, int, int);
static void line_eqn_node_to_pass(struct All_variables *, int, int, int, int, int, int);
void full_parallel_communication_routs_v(E)
@@ -534,7 +534,7 @@ void full_parallel_communication_routs_v(E)
}
E->parallel.PROCESSOR[lev][CPPR].pass[npass] = target;
- face_eqn_node_to_pass(E,lev,CPPR,npass,ii);
+ face_eqn_node_to_pass(E,lev,npass,ii);
/* +X face */
npass = ii = 2;
@@ -550,7 +550,7 @@ void full_parallel_communication_routs_v(E)
target = E->parallel.loc2proc_map[temp][ly][nprocy-1][lz];
}
E->parallel.PROCESSOR[lev][CPPR].pass[npass] = target;
- face_eqn_node_to_pass(E,lev,CPPR,npass,ii);
+ face_eqn_node_to_pass(E,lev,npass,ii);
/* -Y face */
npass = ii = 3;
@@ -567,7 +567,7 @@ void full_parallel_communication_routs_v(E)
}
E->parallel.PROCESSOR[lev][CPPR].pass[npass] = target;
- face_eqn_node_to_pass(E,lev,CPPR,npass,ii);
+ face_eqn_node_to_pass(E,lev,npass,ii);
/* +Y face */
npass = ii = 4;
@@ -584,7 +584,7 @@ void full_parallel_communication_routs_v(E)
}
E->parallel.PROCESSOR[lev][CPPR].pass[npass] = target;
- face_eqn_node_to_pass(E,lev,CPPR,npass,ii);
+ face_eqn_node_to_pass(E,lev,npass,ii);
/* do lines parallel to Z */
@@ -810,9 +810,9 @@ void full_parallel_communication_routs_s(E)
/* ================================================ */
/* ================================================ */
-static void face_eqn_node_to_pass(E,lev,m,npass,bd)
+static void face_eqn_node_to_pass(E,lev,npass,bd)
struct All_variables *E;
- int lev,m,npass,bd;
+ int lev,npass,bd;
{
int jj,kk,node,doff;
const int dims=E->mesh.nsd;
@@ -828,8 +828,6 @@ static void face_eqn_node_to_pass(E,lev,m,npass,bd)
}
E->parallel.NUM_NEQ[lev][CPPR].pass[npass] = jj;
-
- return;
}
/* ================================================ */
More information about the CIG-COMMITS
mailing list