[cig-commits] [commit] rajesh-petsc-schur: Eliminated the 5th argument of get_elt_g, which was set to the caps_per_proc loop variable (3ec7e17)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Thu Sep 18 13:17:39 PDT 2014
Repository : https://github.com/geodynamics/citcoms
On branch : rajesh-petsc-schur
Link : https://github.com/geodynamics/citcoms/compare/b8ceede151860da20e44adbb561266c5d0878b18...0aff4ed493594ce0d58153a5e0b72afdba61d6fd
>---------------------------------------------------------------
commit 3ec7e17b1f979a84047ea7a9ffbe85a9015d47c3
Author: Rajesh Kommu <rajesh.kommu at gmail.com>
Date: Thu Sep 18 10:47:35 2014 -0700
Eliminated the 5th argument of get_elt_g, which was set to the caps_per_proc loop variable
>---------------------------------------------------------------
3ec7e17b1f979a84047ea7a9ffbe85a9015d47c3
lib/Construct_arrays.c | 2 +-
lib/Element_calculations.c | 6 +++---
lib/prototypes.h | 2 +-
3 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/lib/Construct_arrays.c b/lib/Construct_arrays.c
index 2240815..3bc2fda 100644
--- a/lib/Construct_arrays.c
+++ b/lib/Construct_arrays.c
@@ -650,7 +650,7 @@ void construct_elt_gs(E)
for(lev=E->mesh.gridmin;lev<=E->mesh.gridmax;lev++)
for(el=1;el<=E->lmesh.NEL[lev];el++)
- get_elt_g(E,el,E->elt_del[lev][CPPR][el].g,lev,CPPR);
+ get_elt_g(E,el,E->elt_del[lev][CPPR][el].g,lev);
}
diff --git a/lib/Element_calculations.c b/lib/Element_calculations.c
index 66b8ed2..1f4b97b 100644
--- a/lib/Element_calculations.c
+++ b/lib/Element_calculations.c
@@ -865,9 +865,9 @@ void get_elt_c(struct All_variables *E, int el, higher_precision elt_c[24][1], i
used for the divergence
============================================================== */
-void get_elt_g(E,el,elt_del,lev,m)
+void get_elt_g(E,el,elt_del,lev)
struct All_variables *E;
- int el,m;
+ int el;
higher_precision elt_del[24][1];
int lev;
@@ -892,7 +892,7 @@ void get_elt_g(E,el,elt_del,lev,m)
if ((el-1)%E->lmesh.ELZ[lev]==0)
construct_c3x3matrix_el(E,el,&E->element_Cc,&E->element_Ccx,lev,1);
- get_rtf_at_ppts(E, m, lev, el, rtf);
+ get_rtf_at_ppts(E, CPPR, lev, el, rtf);
temp = p_point[1].weight[dims-1] * E->GDA[lev][CPPR][el].ppt[1];
diff --git a/lib/prototypes.h b/lib/prototypes.h
index c9e1181..1350a1c 100644
--- a/lib/prototypes.h
+++ b/lib/prototypes.h
@@ -120,7 +120,7 @@ void assemble_div_u(struct All_variables *, double **, double **, int);
void assemble_grad_p(struct All_variables *, double **, double **, int);
double assemble_dAhatp_entry(struct All_variables *, int, int);
void get_elt_c(struct All_variables *, int, higher_precision [24][1], int);
-void get_elt_g(struct All_variables *, int, higher_precision [24][1], int, int);
+void get_elt_g(struct All_variables *, int, higher_precision [24][1], int);
void get_elt_f(struct All_variables *, int, double [24], int);
void get_aug_k(struct All_variables *, int, double [24*24], int);
/* Full_boundary_conditions.c */
More information about the CIG-COMMITS
mailing list