[cig-commits] [commit] rajesh-petsc-schur: Eliminated the 2nd argument of iget_radial_element and iget_regel, which was set to the caps_per_proc loop variable (8c6177b)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Wed Nov 5 19:09:39 PST 2014


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

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

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

commit 8c6177ba4a039b78a41da1de99ace3ba19fb51dc
Author: Rajesh Kommu <rajesh.kommu at gmail.com>
Date:   Thu Sep 18 11:41:42 2014 -0700

    Eliminated the 2nd argument of iget_radial_element and iget_regel, which was set to the caps_per_proc loop variable


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

8c6177ba4a039b78a41da1de99ace3ba19fb51dc
 lib/Full_tracer_advection.c | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lib/Full_tracer_advection.c b/lib/Full_tracer_advection.c
index 2442b78..fbca1df 100644
--- a/lib/Full_tracer_advection.c
+++ b/lib/Full_tracer_advection.c
@@ -78,9 +78,9 @@ static void fix_radius(struct All_variables *E,
 static void fix_angle(double *angle);
 static void fix_theta_phi(double *theta, double *phi);
 static int iget_radial_element(struct All_variables *E,
-                               int j, int iel,
+                               int iel,
                                double rad);
-static int iget_regel(struct All_variables *E, int j,
+static int iget_regel(struct All_variables *E,
                       double theta, double phi,
                       int *ntheta, int *nphi);
 static void define_uv_space(struct All_variables *E);
@@ -2534,7 +2534,7 @@ int full_iget_element(struct All_variables *E,
 
     /* get regular element number */
 
-    iregel=iget_regel(E,CPPR,theta,phi,&ntheta,&nphi);
+    iregel=iget_regel(E,theta,phi,&ntheta,&nphi);
     if (iregel<=0)
         {
             return -99;
@@ -2674,7 +2674,7 @@ int full_iget_element(struct All_variables *E,
 
     /* find radial element */
 
-    ifinal_iel=iget_radial_element(E,CPPR,iel,rad);
+    ifinal_iel=iget_radial_element(E,iel,rad);
 
     return ifinal_iel;
 }
@@ -2686,7 +2686,7 @@ int full_iget_element(struct All_variables *E,
 /* an element (iel) from the column.                         */
 
 static int iget_radial_element(struct All_variables *E,
-                               int j, int iel,
+                               int iel,
                                double rad)
 {
 
@@ -2737,7 +2737,7 @@ static int iget_radial_element(struct All_variables *E,
 /* exists. If not found, returns -99.                            */
 /* npi and ntheta are modified for later use                     */
 
-static int iget_regel(struct All_variables *E, int j,
+static int iget_regel(struct All_variables *E,
                       double theta, double phi,
                       int *ntheta, int *nphi)
 {



More information about the CIG-COMMITS mailing list