Changeset 21301

Timestamp:

10/20/16 15:54:46 (8 years ago)

Author:

Eric.Larour

Message:

CHG: ice shelves do not contribute sea level rise!

File:

• issm/branches/trunk-larour-NatGeoScience2016/src/c/classes/Elements/Tria.cpp (modified) (1 diff)

issm/branches/trunk-larour-NatGeoScience2016/src/c/classes/Elements/Tria.cpp

@@ -3709 +3709 @@
         deltathickness_input->GetInputAverage(&I);
 
+        /*Are we on an ice shelf? if so, does not contribute to sea level rise!: */
+        if (this->IsFloating()) I=0;
+
         /*Compute eustatic compoent:*/
         _assert_(oceanarea>0.);