| 18 |
#include "DYNVARS.h" |
#include "DYNVARS.h" |
| 19 |
#include "FFIELDS.h" |
#include "FFIELDS.h" |
| 20 |
#include "SEAICE.h" |
#include "SEAICE.h" |
|
#include "SEAICE_PARAMS.h" |
|
| 21 |
#include "SEAICE_FFIELDS.h" |
#include "SEAICE_FFIELDS.h" |
| 22 |
|
COMMON /SEAICE_BOUND_RL/ |
| 23 |
|
& MAX_HEFF, MIN_ATEMP, MIN_LWDOWN, MAX_TICE, MIN_TICE, |
| 24 |
|
& SEAICE_EPS, SEAICE_EPS_SQ |
| 25 |
|
_RL SEAICE_EPS, SEAICE_EPS_SQ |
| 26 |
|
_RL MAX_HEFF, MIN_ATEMP, MIN_LWDOWN, MAX_TICE, MIN_TICE |
| 27 |
|
|
| 28 |
C === Routine arguments === |
C === Routine arguments === |
| 29 |
C myThid - Thread no. that called this routine. |
C myThid - Thread no. that called this routine. |
| 30 |
_RL A22 |
_RL A22 |