source: issm/oecreview/Archive/17984-18295/ISSM-18190-18191.diff@ 18296

Last change on this file since 18296 was 18296, checked in by Mathieu Morlighem, 11 years ago

Added 17984-18295

File size: 971 bytes
RevLine 
[18296]1Index: ../trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp
2===================================================================
3--- ../trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp (revision 18190)
4+++ ../trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp (revision 18191)
5@@ -2941,13 +2941,14 @@
6
7 }
8
9+ /*Transform Coordinate System*/
10+ element->TransformStiffnessMatrixCoord(Ke,cs_list);
11+
12+ /*The pressure augmentation should not be transformed*/
13 MatrixMultiply(BtBUzawa,pnumdof,numdof,1,
14 BtBUzawa,pnumdof,numdof,0,
15 &Ke->values[0],1);
16
17- /*Transform Coordinate System*/
18- element->TransformStiffnessMatrixCoord(Ke,cs_list);
19-
20 /*Clean up and return*/
21 delete gauss;
22 xDelete<IssmDouble>(xyz_list);
23@@ -3722,7 +3723,7 @@
24 }
25
26 /*Transform coordinate system*/
27- element->TransformLoadVectorCoord(pe,cs_list);
28+ //element->TransformLoadVectorCoord(pe,cs_list); Do not transform pressure augmentation
29
30 /*Clean up and return*/
31 delete gauss;
Note: See TracBrowser for help on using the repository browser.