1 |
C $Header: /u/gcmpack/MITgcm/pkg/seaice/seaice_ad_check_lev3_dir.h,v 1.20 2012/04/19 16:06:42 heimbach Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
CADJ STORE StoreSEAICE = tapelev3, key = ilev_3 |
5 |
CADJ STORE tices = tapelev3, key = ilev_3 |
6 |
|
7 |
#ifdef AUTODIFF_SOMETIMES_NEEDED |
8 |
CADJ STORE area = tapelev3, key = ilev_3 |
9 |
CADJ STORE heff = tapelev3, key = ilev_3 |
10 |
CADJ STORE uice = tapelev3, key = ilev_3 |
11 |
CADJ STORE vice = tapelev3, key = ilev_3 |
12 |
#endif |
13 |
|
14 |
#ifdef ALLOW_COST_ICE |
15 |
CADJ STORE objf_ice = tapelev3, key = ilev_3 |
16 |
#endif |
17 |
#ifdef ALLOW_SEAICE_COST_EXPORT |
18 |
CADJ STORE uHeffExportCell = tapelev3, key = ilev_3 |
19 |
CADJ STORE vHeffExportCell = tapelev3, key = ilev_3 |
20 |
CADJ STORE icevolMeanCell = tapelev3, key = ilev_3 |
21 |
#endif |
22 |
#if (defined (ALLOW_MEAN_SFLUX_COST_CONTRIBUTION) || defined (ALLOW_SSH_GLOBMEAN_COST_CONTRIBUTION)) |
23 |
CADJ STORE AREAforAtmFW = tapelev3, key = ilev_3 |
24 |
#endif |
25 |
|
26 |
#ifdef ALLOW_OBCS |
27 |
# ifdef ALLOW_OBCS_EAST |
28 |
CADJ STORE obeuice,obeuice0,obeuice1 = tapelev3, key = ilev_3 |
29 |
CADJ STORE obevice,obevice0,obevice1 = tapelev3, key = ilev_3 |
30 |
# endif |
31 |
# ifdef ALLOW_OBCS_NORTH |
32 |
CADJ STORE obnuice,obnuice0,obnuice1 = tapelev3, key = ilev_3 |
33 |
CADJ STORE obnvice,obnvice0,obnvice1 = tapelev3, key = ilev_3 |
34 |
# endif |
35 |
# ifdef ALLOW_OBCS_SOUTH |
36 |
CADJ STORE obsuice,obsuice0,obsuice1 = tapelev3, key = ilev_3 |
37 |
CADJ STORE obsvice,obsvice0,obsvice1 = tapelev3, key = ilev_3 |
38 |
# endif |
39 |
# ifdef ALLOW_OBCS_WEST |
40 |
CADJ STORE obwuice,obwuice0,obwuice1 = tapelev3, key = ilev_3 |
41 |
CADJ STORE obwvice,obwvice0,obwvice1 = tapelev3, key = ilev_3 |
42 |
# endif |
43 |
#endif |
44 |
|
45 |
#ifdef ALLOW_SITRACER |
46 |
CADJ STORE sitracer = tapelev3, key = ilev_3 |
47 |
CADJ STORE sitrarea = tapelev3, key = ilev_3 |
48 |
CADJ STORE sitrheff = tapelev3, key = ilev_3 |
49 |
#endif |
50 |
|