Changeset 23321
- Timestamp:
- 09/19/18 14:43:51 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/shared/Elements/PddSurfaceMassBalanceSicopolis.cpp
r23317 r23321 69 69 IssmDouble inv_s_stat =1.0/s_stat; 70 70 IssmDouble inv_sqrt2 =1.0/sqrt(2.0); 71 72 #if defined(_HAVE_ADOLC_) 71 73 pdd=pdd+(s_stat*inv_sqrt2pi*exp(-0.5*pow(tstar*inv_s_stat,2)) 72 74 +0.5*tstar*erfc(-tstar*inv_s_stat*inv_sqrt2))*inv_twelve; 75 #else 76 _error_("Cannot differentiate erfc, talk to ADOLC folks (http://functions.wolfram.com/GammaBetaErf/Erfc/20/01/)"); 77 #endif 73 78 74 79 /*Partition of precip in solid and liquid parts, Bales et al. (2009) */
Note:
See TracChangeset
for help on using the changeset viewer.