source: issm/oecreview/Archive/19101-20495/ISSM-20346-20347.diff

Last change on this file was 20498, checked in by Mathieu Morlighem, 9 years ago

CHG: done with Archive/19101-20495

File size: 688 bytes
RevLine 
[20498]1Index: ../trunk-jpl/src/c/cores/sealevelrise_core_eustatic.cpp
2===================================================================
3--- ../trunk-jpl/src/c/cores/sealevelrise_core_eustatic.cpp (revision 20346)
4+++ ../trunk-jpl/src/c/cores/sealevelrise_core_eustatic.cpp (revision 20347)
5@@ -47,6 +47,9 @@
6 * presence of ice (terms 1 and 4 in Eq.4 of Farrel and Clarke):*/
7 Sgi->Shift(-eustatic-Sgi_oceanaverage);
8
9+ /*save eustatic value for results: */
10+ femmodel->results->AddResult(new GenericExternalResult<IssmPDouble>(femmodel->results->Size()+1,SealevelEustaticEnum,-eustatic));
11+
12 xDelete<IssmDouble>(latitude);
13 xDelete<IssmDouble>(longitude);
14 xDelete<IssmDouble>(radius);
Note: See TracBrowser for help on using the repository browser.