1 |
C $Header: /u/gcmpack/MITgcm/pkg/seaice/seaice.flow,v 1.1 2013/08/09 01:22:32 jmc Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
C---------------------------------------- |
5 |
C FUNCTION SEAICE_DIAG_SUFX |
6 |
C---------------------------------------- |
7 |
CADJ FUNCTION SEAICE_DIAG_SUFX INPUT = 1,2 |
8 |
CADJ FUNCTION SEAICE_DIAG_SUFX OUTPUT = |
9 |
|
10 |
C---------------------------------------- |
11 |
C SUBROUTINE SEAICE_CHECK_PICKUP |
12 |
C---------------------------------------- |
13 |
CADJ SUBROUTINE SEAICE_CHECK_PICKUP INPUT = 1,2,3,4,5 |
14 |
CADJ SUBROUTINE SEAICE_CHECK_PICKUP OUTPUT = |