[cig-commits] r11199 - cs/benchmark/cigma/trunk/src

luis at geodynamics.org luis at geodynamics.org
Wed Feb 20 05:12:41 PST 2008


Author: luis
Date: 2008-02-20 05:12:40 -0800 (Wed, 20 Feb 2008)
New Revision: 11199

Modified:
   cs/benchmark/cigma/trunk/src/FE_Field.cpp
Log:
Removed commented out code from FE_Field::tabulate_element()
 * Parts were moved to FE::set_quadrature()
 * Parts were moved to FE::update_jxw()


Modified: cs/benchmark/cigma/trunk/src/FE_Field.cpp
===================================================================
--- cs/benchmark/cigma/trunk/src/FE_Field.cpp	2008-02-20 13:12:38 UTC (rev 11198)
+++ cs/benchmark/cigma/trunk/src/FE_Field.cpp	2008-02-20 13:12:40 UTC (rev 11199)
@@ -79,28 +79,16 @@
     Cell *cell = fe->cell;
     assert(cell != 0);
 
-    // quadrature
     QuadraturePoints *quadrature = fe->quadrature;
     assert(quadrature != 0);
     int nq = quadrature->n_points();
     double *qpts = quadrature->qpts;
-    //double *qwts = quadrature->qwts;
 
-    // get shape function values at known quadrature points
-    //cell->shape(nq, qpts, fe->basis_tab);
-
-    // get shape function derivatives at known quadrature points
-    //cell->grad_shape(nq, qpts, fe->basis_jet);
-
-    // XXX: move this step out of tabulate()
-    // evaluate jacobian at known quadrature points and calculate jxw
-    //fe->update_jxw();
-
     // tabulate the function values
     int i,j;
     const int valdim = n_rank();
     const int ndofs = cell->n_nodes();
-    double dofs[ndofs * valdim];
+    double dofs[ndofs * valdim]; // XXX
 
     get_cell_dofs(e, dofs);
 



More information about the cig-commits mailing list