1 |
gforget |
1.1 |
C $Header: /u/gcmpack/MITgcm/pkg/dic/dic_ad_check_lev1_dir.h,v 1.1 2008/04/12 00:08:45 gforget Exp $ |
2 |
|
|
C $Name: $ |
3 |
|
|
|
4 |
|
|
#ifdef ALLOW_DIC |
5 |
|
|
|
6 |
|
|
C common CARBON_NEEDS |
7 |
|
|
CADJ STORE pH = tapelev2, key = ilev_2 |
8 |
|
|
CADJ STORE fice = tapelev2, key = ilev_2 |
9 |
|
|
CADJ STORE silica = tapelev2, key = ilev_2 |
10 |
|
|
CADJ STORE atmospco2 = tapelev2, key = ilev_2 |
11 |
|
|
|
12 |
|
|
C common dic_load |
13 |
|
|
CADJ STORE dicwind0,dicwind1 = tapelev2, key = ilev_2 |
14 |
|
|
CADJ STORE ice0,ice1 = tapelev2, key = ilev_2 |
15 |
|
|
CADJ STORE atmosp0,atmosp1 = tapelev2, key = ilev_2 |
16 |
|
|
CADJ STORE silica0,silica1 = tapelev2, key = ilev_2 |
17 |
|
|
#ifdef ALLOW_FE |
18 |
|
|
CADJ STORE feinput0,feinput1 = tapelev2, key = ilev_2 |
19 |
|
|
#endif |
20 |
|
|
|
21 |
|
|
CADJ STORE gsm_s = tapelev2, key = ilev_2 |
22 |
|
|
CADJ STORE co2atmos = tapelev2, key = ilev_2 |
23 |
|
|
CADJ STORE total_atmos_carbon = tapelev2, key = ilev_2 |
24 |
|
|
|
25 |
|
|
#endif /* ALLOW_DIC */ |
26 |
|
|
|