/[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.10 - (show annotations) (download)
Thu May 25 18:32:55 2006 UTC (18 years ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint58l_post, checkpoint58n_post, checkpoint58h_post, checkpoint58q_post, checkpoint58j_post, checkpoint58f_post, checkpoint58i_post, checkpoint58g_post, checkpoint58o_post, checkpoint58k_post, checkpoint58p_post, checkpoint58m_post
Changes since 1.9: +2 -0 lines
File MIME type: text/plain 
o add new fields wspeed, snowprecip (to be able to couple to thsice)
o correct Stefan-Boltzmann constant
o new parameter for longwave surface emittance
o separate some stuff from exf_bulkformulae into new routines
  exf_radiation, exf_wind
1 #ifdef ALLOW_EXF
2
3 CADJ STORE hflux0 = tapelev3, key = ilev_3
4 CADJ STORE hflux1 = tapelev3, key = ilev_3
5 CADJ STORE sflux0 = tapelev3, key = ilev_3
6 CADJ STORE sflux1 = tapelev3, key = ilev_3
7 CADJ STORE ustress0 = tapelev3, key = ilev_3
8 CADJ STORE ustress1 = tapelev3, key = ilev_3
9 CADJ STORE vstress0 = tapelev3, key = ilev_3
10 CADJ STORE vstress1 = tapelev3, key = ilev_3
11 CADJ STORE wspeed0 = tapelev3, key = ilev_3
12 CADJ STORE wspeed1 = tapelev3, key = ilev_3
13
14 # ifdef ALLOW_ATM_TEMP
15
16 CADJ STORE aqh0 = tapelev3, key = ilev_3
17 CADJ STORE aqh1 = tapelev3, key = ilev_3
18 CADJ STORE atemp0 = tapelev3, key = ilev_3
19 CADJ STORE atemp1 = tapelev3, key = ilev_3
20 CADJ STORE precip0 = tapelev3, key = ilev_3
21 CADJ STORE precip1 = tapelev3, key = ilev_3
22 CADJ STORE lwflux0 = tapelev3, key = ilev_3
23 CADJ STORE lwflux1 = tapelev3, key = ilev_3
24 CADJ STORE swflux0 = tapelev3, key = ilev_3
25 CADJ STORE swflux1 = tapelev3, key = ilev_3
26 # ifdef EXF_READ_EVAP
27 CADJ STORE evap0 = tapelev3, key = ilev_3
28 CADJ STORE evap1 = tapelev3, key = ilev_3
29 # else
30 CADJ STORE evap = tapelev3, key = ilev_3
31 # endif /* EXF_READ_EVAP */
32 # ifdef ALLOW_DOWNWARD_RADIATION
33 CADJ STORE swdown0 = tapelev3, key = ilev_3
34 CADJ STORE swdown1 = tapelev3, key = ilev_3
35 CADJ STORE lwdown0 = tapelev3, key = ilev_3
36 CADJ STORE lwdown1 = tapelev3, key = ilev_3
37 # endif
38
39 # else /* ALLOW_ATM_TEMP undef */
40
41 # ifdef SHORTWAVE_HEATING
42 CADJ STORE swflux0 = tapelev3, key = ilev_3
43 CADJ STORE swflux1 = tapelev3, key = ilev_3
44 # endif
45
46 # endif /* ALLOW_ATM_TEMP */
47
48 # ifdef ALLOW_ATM_WIND
49
50 CADJ STORE uwind0 = tapelev3, key = ilev_3
51 CADJ STORE uwind1 = tapelev3, key = ilev_3
52 CADJ STORE vwind0 = tapelev3, key = ilev_3
53 CADJ STORE vwind1 = tapelev3, key = ilev_3
54
55 # else /* ALLOW_ATM_WIND undef */
56
57 # endif /* ALLOW_ATM_WIND */
58
59 # ifdef ALLOW_CLIMSSS_RELAXATION
60 CADJ STORE climsss0 = tapelev3, key = ilev_3
61 CADJ STORE climsss1 = tapelev3, key = ilev_3
62 # endif
63 # ifdef ALLOW_CLIMSST_RELAXATION
64 CADJ STORE climsst0 = tapelev3, key = ilev_3
65 CADJ STORE climsst1 = tapelev3, key = ilev_3
66 # endif
67 # ifdef ALLOW_CLIMSALT_RELAXATION
68 cph not used so far
69 cphCADJ STORE climsalt0 = tapelev3, key = ilev_3
70 cphCADJ STORE climsalt1 = tapelev3, key = ilev_3
71 # endif
72 # ifdef ALLOW_CLIMTEMP_RELAXATION
73 cph not used so far
74 cphCADJ STORE climtemp0 = tapelev3, key = ilev_3
75 cphCADJ STORE climtemp1 = tapelev3, key = ilev_3
76 # endif
77 # ifdef ATMOSPHERIC_LOADING
78 CADJ STORE apressure0 = tapelev3, key = ilev_3
79 CADJ STORE apressure1 = tapelev3, key = ilev_3
80 # endif
81
82 # ifdef ALLOW_HFLUX_CONTROL
83 CADJ STORE xx_hflux0 = tapelev3, key = ilev_3
84 CADJ STORE xx_hflux1 = tapelev3, key = ilev_3
85 # endif
86 # ifdef ALLOW_SFLUX_CONTROL
87 CADJ STORE xx_sflux0 = tapelev3, key = ilev_3
88 CADJ STORE xx_sflux1 = tapelev3, key = ilev_3
89 # endif
90 # ifdef ALLOW_USTRESS_CONTROL
91 CADJ STORE xx_tauu0 = tapelev3, key = ilev_3
92 CADJ STORE xx_tauu1 = tapelev3, key = ilev_3
93 # endif
94 # ifdef ALLOW_VSTRESS_CONTROL
95 CADJ STORE xx_tauv0 = tapelev3, key = ilev_3
96 CADJ STORE xx_tauv1 = tapelev3, key = ilev_3
97 # endif
98 # ifdef ALLOW_UWIND_CONTROL
99 CADJ STORE xx_uwind0 = tapelev3, key = ilev_3
100 CADJ STORE xx_uwind1 = tapelev3, key = ilev_3
101 # endif
102 # ifdef ALLOW_VWIND_CONTROL
103 CADJ STORE xx_vwind0 = tapelev3, key = ilev_3
104 CADJ STORE xx_vwind1 = tapelev3, key = ilev_3
105 # endif
106 # ifdef ALLOW_ATEMP_CONTROL
107 CADJ STORE xx_atemp0 = tapelev3, key = ilev_3
108 CADJ STORE xx_atemp1 = tapelev3, key = ilev_3
109 # endif
110 # ifdef ALLOW_AQH_CONTROL
111 CADJ STORE xx_aqh0 = tapelev3, key = ilev_3
112 CADJ STORE xx_aqh1 = tapelev3, key = ilev_3
113 # endif
114 # ifdef ALLOW_PRECIP_CONTROL
115 CADJ STORE xx_precip0 = tapelev3, key = ilev_3
116 CADJ STORE xx_precip1 = tapelev3, key = ilev_3
117 # endif
118 # ifdef ALLOW_SWFLUX_CONTROL
119 CADJ STORE xx_swflux0 = tapelev3, key = ilev_3
120 CADJ STORE xx_swflux1 = tapelev3, key = ilev_3
121 # endif
122 # ifdef ALLOW_SWDOWN_CONTROL
123 CADJ STORE xx_swdown0 = tapelev3, key = ilev_3
124 CADJ STORE xx_swdown1 = tapelev3, key = ilev_3
125 # endif
126 # ifdef ALLOW_SST_CONTROL
127 CADJ STORE xx_sst0 = tapelev3, key = ilev_3
128 CADJ STORE xx_sst1 = tapelev3, key = ilev_3
129 # endif
130 # ifdef ALLOW_SSS_CONTROL
131 CADJ STORE xx_sss0 = tapelev3, key = ilev_3
132 CADJ STORE xx_sss1 = tapelev3, key = ilev_3
133 # endif
134
135 #endif /* ALLOW_EXF */
  ViewVC Help
Powered by ViewVC 1.1.22