/[MITgcm]/MITgcm/pkg/ebm/EBM.h
ViewVC logotype

Annotation of /MITgcm/pkg/ebm/EBM.h

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


Revision 1.1 - (hide annotations) (download)
Fri May 14 21:10:33 2004 UTC (20 years ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint53b_post
File MIME type: text/plain
Commiting new energy balance model to repository
o package is pkg/ebm
o verif. is verification/global_ocean_ebm
o references are in ebm_driver.F
Will need long integration testing.

1 heimbach 1.1 C CountX - number of ocean points in each latitude band
2     C ZonalMeanSST - zonal mean sea surface temperature
3     C TmlS - Average mid-latitude temperature in the
4     c Southern Hemisphere
5     C TmlN - Northern
6     C TtS - Average tropical temperature in the Southern Hemisphere
7     C TtN - Northern
8     C winPert - weather patterns added to the background wind.
9     COMMON /EBM_FLD_RL/
10     & ZonalMeanSST, CountX,
11     & TmlN, TmlS, TtN, TtS
12     _RL ZonalMeanSST(1-OLy:sNy+OLy)
13     _RL CountX(1-OLy:sNy+OLy)
14     _RL TmlS, TmlN, TtS, TtN
15    
16     COMMON /EBM_FLD_RS/
17     & Run,
18     & winPert
19     _RS Run (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
20     _RS winPert (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
21    
22     COMMON /EBM_PARAM_C/
23     & RunoffFile
24     CHARACTER*(MAX_LEN_FNAM) RunoffFile
25    
26     COMMON /EBM_PARAM_RL/
27     & tauThetaZonRelax,
28     & lambdaThetaZonRelax,
29     & scale_runoff
30     _RL tauThetaZonRelax
31     _RL lambdaThetaZonRelax
32     _RL scale_runoff
33    
34     C Constant parameters
35     _RL t_mlt, lv, cp, rho_air
36     PARAMETER (t_mlt = 273.15, lv = 2.5e6, cp = 1004., rho_air = 1.27)
37     C sin(lat) and Legendre polynomials
38     _RL S(1-OLy:sNy+OLy)
39     _RL P2(1-OLy:sNy+OLy), P4(1-OLy:sNy+OLy)
40     C Shortwave and albedo parameters
41     _RL SW(1-OLy:sNy+OLy)
42     _RL Q0, Q2, A0, A2, A4
43     PARAMETER ( Q0 = 1365., Q2 = -0.482)
44     PARAMETER ( A0 = 0.322, A2 = 0.231, A4 = 0.086 )
45     C Longwave parameters
46     _RL LW(1-OLy:sNy+OLy)
47     _RL LW0, LW1
48     PARAMETER ( LW0 = 195., LW1 = 2.78 )
49     C Heat transport parameters
50     _RL Hd(1-OLy:sNy+OLy), Hd35(2)
51     _RL H1, H3, H5
52     PARAMETER ( H1 = 3.866, H3 = -2.851, H5 = -1.016 )
53     C Freshwater flux parameters
54     _RL Fw(1-OLy:sNy+OLy), Fw35(2)
55     _RL F1, F2, F3, F4, F5
56     PARAMETER ( F1 = 2.092, F2 = 5.796, F3 = 8.472,
57     & F4 = 7.728, F5 = 2.362 )
58     C Temperature parameterization
59     _RL T(1-OLy:sNy+OLy)
60     _RL T_var(4), T0(2), T2(2), T35(2), DTDy35(2)
61     C Parameters used to calculate the transport efficiency
62     _RL Cl, Cf, Cs, C
63     _RL gamma, kappa, De
64     _RL trans_eff, Hw, Nw, Tw, At, dz, htil, tau
65     PARAMETER (trans_eff = 2.0, Hw = 8.e3, Nw = 0.013,
66     & Tw = 300., At = 3., dz = 450., htil = 0.8, tau = 5.e-3)
67     C Climate change parameter (W/(m^2 y) )
68     _RL DLW
69     PARAMETER (DLW = 0.06)
70     C Latitude boundaries used
71     _RL lat(3)
72     DATA lat / 0.0, 35.0, 85.0 /
73    

  ViewVC Help
Powered by ViewVC 1.1.22