Changeset 23538
- Timestamp:
- 12/12/18 00:38:23 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/Loads/Friction.cpp
r23531 r23538 316 316 Based on Gagliardini 2007, needs a good effective pressure computation 317 317 Not tested so far so use at your own risks 318 alpha2= NeffC[Chi/(1+alpha*Chi^q)]^(1/n)*|vel|^( 1/n-1) with318 alpha2= NeffC[Chi/(1+alpha*Chi^q)]^(1/n)*|vel|^(-1) with 319 319 Chi=|vel|/(C^n*Neff^n*As) 320 320 alpha=(q-1)^(q-1)/q^q */ … … 375 375 if(vmag==0.) alpha2=0.; 376 376 else if (Neff==0) alpha2=0.0; 377 else alpha2=Neff * C_param * pow(Gamma,1./n) * pow(vmag, 1/n-1);377 else alpha2=Neff * C_param * pow(Gamma,1./n) * pow(vmag,-1); 378 378 379 379 _assert_(!xIsNan<IssmDouble>(alpha2));
Note:
See TracChangeset
for help on using the changeset viewer.