[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
Wed Nov 5 19:09:11 PST 2014


Repository : https://github.com/geodynamics/citcoms

On branch  : rajesh-petsc-schur
Link       : https://github.com/geodynamics/citcoms/compare/464e1b32299b15819f93efd98d969cddb84dfe51...f97ae655a50bdbd6dac1923a3471ee4dae178fbd

>---------------------------------------------------------------

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