Changeset 18797


Ignore:
Timestamp:
11/17/14 13:56:59 (10 years ago)
Author:
bdef
Message:

CHG: Adding friction law and clean up

File:
1 edited

Legend:

Unmodified
Added
Removed
  • TabularUnified issm/trunk-jpl/src/c/classes/Loads/Friction.cpp ΒΆ

    r18781 r18797  
    224224                alpha=(pow(q_exp-1,q_exp-1))/pow(q_exp,q_exp);
    225225        }
    226        
    227226        Chi=vmag/(pow(C_param,n)*pow(Neff,n)*As);
    228 
    229227        alpha2=pow((pow(vmag,1.-n)/(As*(1+alpha*pow(Chi,q_exp)))),1./n);
    230228        _assert_(!xIsNan<IssmDouble>(alpha2));
    231        
    232229        /*Assign output pointers:*/
    233230        *palpha2=alpha2;
Note: See TracChangeset for help on using the changeset viewer.