9 |
COMMON /EBM_FLD_RL/ |
COMMON /EBM_FLD_RL/ |
10 |
& ZonalMeanSST, CountX, |
& ZonalMeanSST, CountX, |
11 |
& TmlN, TmlS, TtN, TtS |
& TmlN, TmlS, TtN, TtS |
12 |
_RL ZonalMeanSST(1-OLy:sNy+OLy) |
_RL ZonalMeanSST(1-OLy:sNy+OLy,nSy) |
13 |
_RL CountX(1-OLy:sNy+OLy) |
_RL CountX(1-OLy:sNy+OLy,nSy) |
14 |
_RL TmlS, TmlN, TtS, TtN |
_RL TmlS, TmlN, TtS, TtN |
15 |
|
|
16 |
COMMON /EBM_FLD_RS/ |
COMMON /EBM_FLD_RS/ |
35 |
_RL t_mlt, lv, cp, rho_air |
_RL t_mlt, lv, cp, rho_air |
36 |
PARAMETER (t_mlt = 273.15, lv = 2.5e6, cp = 1004., rho_air = 1.27) |
PARAMETER (t_mlt = 273.15, lv = 2.5e6, cp = 1004., rho_air = 1.27) |
37 |
C sin(lat) and Legendre polynomials |
C sin(lat) and Legendre polynomials |
38 |
_RL S(1-OLy:sNy+OLy) |
_RL S(1-OLy:sNy+OLy,nSy) |
39 |
_RL P2(1-OLy:sNy+OLy), P4(1-OLy:sNy+OLy) |
_RL P2(1-OLy:sNy+OLy,nSy), P4(1-OLy:sNy+OLy,nSy) |
40 |
C Shortwave and albedo parameters |
C Shortwave and albedo parameters |
41 |
_RL SW(1-OLy:sNy+OLy) |
_RL SW(1-OLy:sNy+OLy,nSy) |
42 |
_RL Q0, Q2, A0, A2, A4 |
_RL Q0, Q2, A0, A2, A4 |
43 |
PARAMETER ( Q0 = 1365., Q2 = -0.482) |
PARAMETER ( Q0 = 1365., Q2 = -0.482) |
44 |
PARAMETER ( A0 = 0.322, A2 = 0.231, A4 = 0.086 ) |
PARAMETER ( A0 = 0.322, A2 = 0.231, A4 = 0.086 ) |
45 |
C Longwave parameters |
C Longwave parameters |
46 |
_RL LW(1-OLy:sNy+OLy) |
_RL LW(1-OLy:sNy+OLy,nSy) |
47 |
_RL LW0, LW1 |
_RL LW0, LW1 |
48 |
PARAMETER ( LW0 = 195., LW1 = 2.78 ) |
PARAMETER ( LW0 = 195., LW1 = 2.78 ) |
49 |
C Heat transport parameters |
C Heat transport parameters |
50 |
_RL Hd(1-OLy:sNy+OLy), Hd35(2) |
_RL Hd(1-OLy:sNy+OLy,nSy), Hd35(2) |
51 |
_RL H1, H3, H5 |
_RL H1, H3, H5 |
52 |
PARAMETER ( H1 = 3.866, H3 = -2.851, H5 = -1.016 ) |
PARAMETER ( H1 = 3.866, H3 = -2.851, H5 = -1.016 ) |
53 |
C Freshwater flux parameters |
C Freshwater flux parameters |
54 |
_RL Fw(1-OLy:sNy+OLy), Fw35(2) |
_RL Fw(1-OLy:sNy+OLy,nSy), Fw35(2) |
55 |
_RL F1, F2, F3, F4, F5 |
_RL F1, F2, F3, F4, F5 |
56 |
PARAMETER ( F1 = 2.092, F2 = 5.796, F3 = 8.472, |
PARAMETER ( F1 = 2.092, F2 = 5.796, F3 = 8.472, |
57 |
& F4 = 7.728, F5 = 2.362 ) |
& F4 = 7.728, F5 = 2.362 ) |
58 |
C Temperature parameterization |
C Temperature parameterization |
59 |
_RL T(1-OLy:sNy+OLy) |
_RL T(1-OLy:sNy+OLy,nSy) |
60 |
_RL T_var(4), T0(2), T2(2), T35(2), DTDy35(2) |
_RL T_var(4), T0(2), T2(2), T35(2), DTDy35(2) |
61 |
C Parameters used to calculate the transport efficiency |
C Parameters used to calculate the transport efficiency |
62 |
_RL Cl, Cf, Cs, C |
_RL Cl, Cf, Cs, C |