[cig-commits] [commit] rajesh-petsc-schur: cleaned up assemble_c_u (4b74abc)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Wed Nov 5 19:03:52 PST 2014


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

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

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

commit 4b74abccd7fd878fe02e254c4bcc60f3ad79afcc
Author: Rajesh Kommu <rajesh.kommu at gmail.com>
Date:   Mon Sep 8 15:39:21 2014 -0700

    cleaned up assemble_c_u


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

4b74abccd7fd878fe02e254c4bcc60f3ad79afcc
 lib/Element_calculations.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Element_calculations.c b/lib/Element_calculations.c
index cbe26ea..713e262 100644
--- a/lib/Element_calculations.c
+++ b/lib/Element_calculations.c
@@ -665,11 +665,12 @@ void assemble_c_u(struct All_variables *E,
     for(m=1;m<=E->sphere.caps_per_proc;m++)
         for(a=1;a<=ends;a++) {
             p = (a-1)*dims;
-            for(e=1;e<=nel;e++) {
+            for(e=0;e<nel;e++) {
                 b = E->IEN[level][m][e].node[a];
                 j1= E->ID[level][m][b].doff[1];
                 j2= E->ID[level][m][b].doff[2];
                 j3= E->ID[level][m][b].doff[3];
+
                 result[m][e] += E->elt_c[level][m][e].c[p  ][0] * U[m][j1]
                               + E->elt_c[level][m][e].c[p+1][0] * U[m][j2]
                               + E->elt_c[level][m][e].c[p+2][0] * U[m][j3];



More information about the CIG-COMMITS mailing list