Changeset 18036
- Timestamp:
- 05/21/14 13:15:26 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/analyses/Balancethickness2Analysis.cpp
r18003 r18036 72 72 73 73 /*Initialize Element vector and other vectors*/ 74 ElementMatrix* Ke = element->NewElementMatrix(); 74 ElementMatrix* Ke = element->NewElementMatrix(); 75 IssmDouble* dbasis = xNew<IssmDouble>(2*numnodes); 75 76 76 77 /*Retrieve all inputs and parameters*/ … … 81 82 for(int ig=gauss->begin();ig<gauss->end();ig++){ 82 83 gauss->GaussPoint(ig); 83 84 IssmDouble* dbasis=xNew<IssmDouble>(2*numnodes);85 84 element->NodalFunctionsDerivatives(dbasis,xyz_list,gauss); 86 85 element->JacobianDeterminant(&Jdet,xyz_list,gauss); … … 95 94 /*Clean up and return*/ 96 95 xDelete<IssmDouble>(xyz_list); 96 xDelete<IssmDouble>(dbasis); 97 97 delete gauss; 98 98 return Ke;
Note:
See TracChangeset
for help on using the changeset viewer.