Parent Directory
|
Revision Log
|
Revision Graph
updating contrib streamice repo with latest files, and separated out convergence checks; and parameterised maximum iteration counts and interface w shelfice for coupling
| 1 | dgoldberg | 1.2 | C $Header: /u/gcmpack/MITgcm/pkg/streamice/streamice_bstress_exponent.F,v 1.3 2013/06/21 20:49:50 jmc Exp $ |
| 2 | C $Name: $ | ||
| 3 | |||
| 4 | dgoldberg | 1.1 | #include "CPP_OPTIONS.h" |
| 5 | |||
| 6 | dgoldberg | 1.2 | _RL FUNCTION STREAMICE_BSTRESS_EXP (speed,m) |
| 7 | |||
| 8 | dgoldberg | 1.1 | _RL speed, m |
| 9 | ! _RL SLOPE_LIMITER | ||
| 10 | |||
| 11 | dgoldberg | 1.2 | STREAMICE_BSTRESS_EXP = speed**(m-1) |
| 12 | dgoldberg | 1.1 | |
| 13 | RETURN | ||
| 14 | dgoldberg | 1.2 | END |
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |