1 |
heimbach |
1.4 |
C $Header: /u/gcmpack/MITgcm/pkg/dic/dic_ad_check_lev4_dir.h,v 1.3 2009/10/14 05:18:18 heimbach Exp $ |
2 |
gforget |
1.1 |
C $Name: $ |
3 |
|
|
|
4 |
|
|
#ifdef ALLOW_DIC |
5 |
|
|
|
6 |
|
|
C common CARBON_NEEDS |
7 |
|
|
CADJ STORE pH = tapelev4, key = ilev_4 |
8 |
|
|
CADJ STORE fice = tapelev4, key = ilev_4 |
9 |
|
|
CADJ STORE silica = tapelev4, key = ilev_4 |
10 |
|
|
CADJ STORE atmospco2 = tapelev4, key = ilev_4 |
11 |
|
|
|
12 |
|
|
C common dic_load |
13 |
|
|
CADJ STORE dicwind0,dicwind1 = tapelev4, key = ilev_4 |
14 |
|
|
CADJ STORE ice0,ice1 = tapelev4, key = ilev_4 |
15 |
|
|
CADJ STORE atmosp0,atmosp1 = tapelev4, key = ilev_4 |
16 |
|
|
CADJ STORE silica0,silica1 = tapelev4, key = ilev_4 |
17 |
|
|
#ifdef ALLOW_FE |
18 |
|
|
CADJ STORE feinput0,feinput1 = tapelev4, key = ilev_4 |
19 |
|
|
#endif |
20 |
|
|
|
21 |
|
|
CADJ STORE gsm_s = tapelev4, key = ilev_4 |
22 |
heimbach |
1.4 |
CADJ STORE co2atmos,pco2 = tapelev4, key = ilev_4 |
23 |
gforget |
1.1 |
CADJ STORE total_atmos_carbon = tapelev4, key = ilev_4 |
24 |
|
|
|
25 |
heimbach |
1.2 |
#ifdef DIC_BIOTIC |
26 |
|
|
CADJ STORE omegaC = tapelev4, key = ilev_4 |
27 |
|
|
#endif |
28 |
heimbach |
1.3 |
#ifdef ALLOW_COST |
29 |
|
|
CADJ STORE totcost = tapelev4, key = ilev_4 |
30 |
|
|
#endif |
31 |
gforget |
1.1 |
|
32 |
|
|
#endif /* ALLOW_DIC */ |
33 |
|
|
|