Changeset 1505 for inundation/ga/storm_surge/pyvolution
- Timestamp:
- Jun 8, 2005, 4:24:43 PM (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
inundation/ga/storm_surge/pyvolution/shallow_water_ext.c
r1387 r1505 170 170 if (h >= eps) { 171 171 S = -g * eta[k]*eta[k] * sqrt((uh[k]*uh[k] + vh[k]*vh[k])); 172 S /= pow(h, 7.0/3); //Expensive (on Ole's home computer) 172 //S /= pow(h, 7.0/3); //Expensive (on Ole's home computer) 173 S /= exp(7.0/3.0*log(h)); //seems to save about 15% over manning_friction 173 174 //S /= h*h*(1 + h/3.0 - h*h/9.0); //FIXME: Could use a Taylor expansion 174 175
Note: See TracChangeset
for help on using the changeset viewer.