Changeset 21292

Timestamp:

10/19/16 15:51:10 (8 years ago)

Author:

Mathieu Morlighem

Message:

CHG: adding new friction law (no sliding) in SIA 2d

File:

• issm/trunk-jpl/src/c/analyses/StressbalanceSIAAnalysis.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/analyses/StressbalanceSIAAnalysis.cpp

@@ -317 +317 @@
 
         /*Intermediaries */
-        int        frictionlaw = 1;
+        int        frictionlaw = 6;
         IssmDouble ub,vb,slope2,drag,thickness,surface,connectivity;
         IssmDouble slope[2];
@@ -377 +377 @@
                                 vb=-drag*rho_ice*gravity*thickness*slope[1];
                                 break;
+                        case 6:
+                                /*No sliding*/
+                                ub=0.;
+                                vb=0.;
                         default:
                                 _error_("Not supported yet");