1 |
cnh |
1.3 |
C $Header: /u/gcmpack/models/MITgcmUV/pkg/aim/com_radcon.h,v 1.2 2001/02/02 21:36:29 adcroft Exp $ |
2 |
|
|
C $Name: $ |
3 |
adcroft |
1.2 |
|
4 |
|
|
C-- |
5 |
|
|
C-- /RADCON/: Radiation constants (initial. in INPHYS) |
6 |
|
|
C-- ABSSW = shortwave absorptivity for dry air (per dp = 10^5 Pa) |
7 |
|
|
C-- ABSLW = longwave absorptivity for dry air (per dp = 10^5 Pa) |
8 |
|
|
C-- ABWSW = shortwave absorptivity for water vapour (per dq = 1 g/kg) |
9 |
|
|
C-- ABWLW = longwave absorptivity for water vapour (per dq = 1 g/kg) |
10 |
|
|
C-- ABCSW = shortwave absorptivity for cloud fraction |
11 |
|
|
C-- ABCLW = longwave absorptivity for cloud fraction |
12 |
|
|
C-- EPSSW = fraction of incoming solar radiation absorbed by ozone |
13 |
|
|
C-- EPSLW = fraction of surface LW radiation emitted directly to space |
14 |
|
|
C-- ALBCL = cloud albedo (for cloud cover = 1) |
15 |
|
|
C-- RHCL1 = relative hum. corresponding to cloud cover = 0 |
16 |
|
|
C-- RHCL2 = relative hum. corresponding to cloud cover = 1 |
17 |
|
|
C-- QACL = specific hum. threshold for cloud cover |
18 |
|
|
|
19 |
|
|
COMMON /RADCON/ ABSSW, ABSLW, ABWSW, ABWLW, |
20 |
|
|
* ABCSW, ABCLW, EPSSW, EPSLW, |
21 |
|
|
* ALBCL, RHCL1, RHCL2, QACL |
22 |
|
|
|
23 |
|
|
C-- |
24 |
|
|
C-- /FLDRAD/: Transmissivity and blackbody radiation (workspace) |
25 |
|
|
C-- TAU = transmissivity of atmospheric layers |
26 |
|
|
C-- ST4A = blackbody emission from full and half atmospheric levels |
27 |
|
|
|
28 |
cnh |
1.3 |
COMMON /RADFLD/ TAUORIG(NGP,NLEV),ST4AORIG(NGP,NLEV,2) |