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 |