/[MITgcm]/MITgcm/pkg/exf/exf_ad_check_lev3_dir.h
ViewVC logotype

Contents of /MITgcm/pkg/exf/exf_ad_check_lev3_dir.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.3 - (show annotations) (download)
Fri Feb 13 20:32:54 2004 UTC (20 years, 4 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint52l_pre, checkpoint52j_post, checkpoint52l_post, checkpoint52k_post, checkpoint52m_post, hrcube5, checkpoint52j_pre
Changes since 1.2: +12 -12 lines
File MIME type: text/plain
Removed non-standard syntax (problem e.g. on IBM SP4)

1 #ifdef ALLOW_EXF
2
3 # ifdef ALLOW_ATM_TEMP
4
5 CADJ STORE aqh0 = tapelev3, key = ilev_3
6 CADJ STORE aqh1 = tapelev3, key = ilev_3
7 CADJ STORE atemp0 = tapelev3, key = ilev_3
8 CADJ STORE atemp1 = tapelev3, key = ilev_3
9 CADJ STORE precip0 = tapelev3, key = ilev_3
10 CADJ STORE precip1 = tapelev3, key = ilev_3
11 CADJ STORE lwflux0 = tapelev3, key = ilev_3
12 CADJ STORE lwflux1 = tapelev3, key = ilev_3
13 CADJ STORE swflux0 = tapelev3, key = ilev_3
14 CADJ STORE swflux1 = tapelev3, key = ilev_3
15 # ifdef EXF_READ_EVAP
16 CADJ STORE evap0 = tapelev3, key = ilev_3
17 CADJ STORE evap1 = tapelev3, key = ilev_3
18 # else
19 CADJ STORE evap = tapelev3, key = ilev_3
20 # endif /* EXF_READ_EVAP */
21 # ifdef ALLOW_DOWNWARD_RADIATION
22 CADJ STORE swdown0 = tapelev3, key = ilev_3
23 CADJ STORE swdown1 = tapelev3, key = ilev_3
24 CADJ STORE lwdown0 = tapelev3, key = ilev_3
25 CADJ STORE lwdown1 = tapelev3, key = ilev_3
26 # endif
27
28 # else /* ALLOW_ATM_TEMP undef */
29
30 CADJ STORE hflux0 = tapelev3, key = ilev_3
31 CADJ STORE hflux1 = tapelev3, key = ilev_3
32 CADJ STORE sflux0 = tapelev3, key = ilev_3
33 CADJ STORE sflux1 = tapelev3, key = ilev_3
34 # ifdef SHORTWAVE_HEATING
35 CADJ STORE swflux0 = tapelev3, key = ilev_3
36 CADJ STORE swflux1 = tapelev3, key = ilev_3
37 # endif
38
39 # endif /* ALLOW_ATM_TEMP */
40
41 # ifdef ALLOW_ATM_WIND
42
43 CADJ STORE uwind0 = tapelev3, key = ilev_3
44 CADJ STORE uwind1 = tapelev3, key = ilev_3
45 CADJ STORE vwind0 = tapelev3, key = ilev_3
46 CADJ STORE vwind1 = tapelev3, key = ilev_3
47
48 # else /* ALLOW_ATM_WIND undef */
49
50 CADJ STORE ustress0 = tapelev3, key = ilev_3
51 CADJ STORE ustress1 = tapelev3, key = ilev_3
52 CADJ STORE vstress0 = tapelev3, key = ilev_3
53 CADJ STORE vstress1 = tapelev3, key = ilev_3
54
55 # endif /* ALLOW_ATM_WIND */
56
57 # ifdef ALLOW_CLIMSSS_RELAXATION
58 CADJ STORE climsss0 = tapelev3, key = ilev_3
59 CADJ STORE climsss1 = tapelev3, key = ilev_3
60 # endif
61 # ifdef ALLOW_CLIMSST_RELAXATION
62 CADJ STORE climsst0 = tapelev3, key = ilev_3
63 CADJ STORE climsst1 = tapelev3, key = ilev_3
64 # endif
65 # ifdef ALLOW_CLIMSALT_RELAXATION
66 cph not used so far
67 cphCADJ STORE climsalt0 = tapelev3, key = ilev_3
68 cphCADJ STORE climsalt1 = tapelev3, key = ilev_3
69 # endif
70 # ifdef ALLOW_CLIMTEMP_RELAXATION
71 cph not used so far
72 cphCADJ STORE climtemp0 = tapelev3, key = ilev_3
73 cphCADJ STORE climtemp1 = tapelev3, key = ilev_3
74 # endif
75 # ifdef ATMOSPHERIC_LOADING
76 CADJ STORE apressure0 = tapelev3, key = ilev_3
77 CADJ STORE apressure1 = tapelev3, key = ilev_3
78 # endif
79
80 # ifdef ALLOW_HFLUX_CONTROL
81 CADJ STORE xx_hflux0 = tapelev3, key = ilev_3
82 CADJ STORE xx_hflux1 = tapelev3, key = ilev_3
83 # endif
84 # ifdef ALLOW_SFLUX_CONTROL
85 CADJ STORE xx_sflux0 = tapelev3, key = ilev_3
86 CADJ STORE xx_sflux1 = tapelev3, key = ilev_3
87 # endif
88 # ifdef ALLOW_USTRESS_CONTROL
89 CADJ STORE xx_tauu0 = tapelev3, key = ilev_3
90 CADJ STORE xx_tauu1 = tapelev3, key = ilev_3
91 # endif
92 # ifdef ALLOW_VSTRESS_CONTROL
93 CADJ STORE xx_tauv0 = tapelev3, key = ilev_3
94 CADJ STORE xx_tauv1 = tapelev3, key = ilev_3
95 # endif
96 # ifdef ALLOW_UWIND_CONTROL
97 CADJ STORE xx_uwind0 = tapelev3, key = ilev_3
98 CADJ STORE xx_uwind1 = tapelev3, key = ilev_3
99 # endif
100 # ifdef ALLOW_VWIND_CONTROL
101 CADJ STORE xx_vwind0 = tapelev3, key = ilev_3
102 CADJ STORE xx_vwind1 = tapelev3, key = ilev_3
103 # endif
104 # ifdef ALLOW_ATEMP_CONTROL
105 CADJ STORE xx_atemp0 = tapelev3, key = ilev_3
106 CADJ STORE xx_atemp1 = tapelev3, key = ilev_3
107 # endif
108 # ifdef ALLOW_AQH_CONTROL
109 CADJ STORE xx_aqh0 = tapelev3, key = ilev_3
110 CADJ STORE xx_aqh1 = tapelev3, key = ilev_3
111 # endif
112
113 #endif /* ALLOW_EXF */

  ViewVC Help
Powered by ViewVC 1.1.22