 |
My Project
programmer's documentation
|
|
My Project
programmer's documentation
|
Compute infrared flux divergence profile and downward flux at ground level relying on a 1D radiative scheme. More...
Functions/Subroutines | |
| subroutine | rayir (ivertc, k1, kmray, ico2, emis, qqv, qqqv, qqvinf, zqq, acinfe, dacinfe, aco2, daco2, aco2s, daco2s, acsup, dacsup, acsups, dacsups, zray, temray, qvray, qlray, fnerir, romray, preray, aeroso, foir, rayi, ncray) |
Compute infrared flux divergence profile and downward flux at ground level relying on a 1D radiative scheme.
More precisely, compute atmospheric infrared (IR) radiation model quantities:
| subroutine rayir | ( | integer | ivertc, |
| integer | k1, | ||
| integer | kmray, | ||
| integer | ico2, | ||
| double precision | emis, | ||
| double precision, dimension(kmx+1) | qqv, | ||
| double precision, dimension(kmx+1) | qqqv, | ||
| double precision | qqvinf, | ||
| double precision, dimension(kmx) | zqq, | ||
| double precision, dimension(kmx) | acinfe, | ||
| double precision, dimension(kmx) | dacinfe, | ||
| double precision, dimension(kmx,kmx) | aco2, | ||
| double precision, dimension(kmx,kmx) | daco2, | ||
| double precision, dimension(kmx,kmx) | aco2s, | ||
| double precision, dimension(kmx,kmx) | daco2s, | ||
| double precision, dimension(kmx) | acsup, | ||
| double precision, dimension(kmx) | dacsup, | ||
| double precision, dimension(kmx) | acsups, | ||
| double precision, dimension(kmx) | dacsups, | ||
| double precision, dimension(kmx) | zray, | ||
| double precision, dimension(kmx) | temray, | ||
| double precision, dimension(kmx) | qvray, | ||
| double precision, dimension(kmx) | qlray, | ||
| double precision, dimension(kmx) | fnerir, | ||
| double precision, dimension(kmx) | romray, | ||
| double precision, dimension(kmx) | preray, | ||
| double precision, dimension(kmx) | aeroso, | ||
| double precision | foir, | ||
| double precision, dimension(kmx) | rayi, | ||
| double precision, dimension(kmx) | ncray | ||
| ) |
| [in] | ivertc | index of vertical profile |
| [in] | k1 | index corresponding to ground level |
| [in] | kmray | number of vertical levels for radiation computation |
| [in] | ico2 | ico2=1 -> compute CO2 absorption |
| [in] | emis | ground surface emissivity |
| [in] | qqv | water vapor + dimers optical depth (0,z) |
| [in] | qqqv | idem qqv but for intermediates vertical levels |
| [in] | qqvinf | idem qqv but for contribution above 11000m |
| [in] | zqq | vertical coordinate |
| [in] | acinfe | absorption for CO2 + O3 (0,z) |
| [in] | dacinfe | differential absorption for CO2 + 03 (0,z) |
| [in] | aco2 | idem acinfe but for CO2 only |
| [in] | daco2 | idem dacinfe but for CO2 only |
| [in] | aco2s | idem acinfe but for CO2 only |
| [in] | daco2s | idem dacinfe but for CO2 only |
| [in] | acsup | idem acinfe, for (z,0) |
| [in] | dacsup | idem dacinfe, for (z,0) |
| [in] | acsups | idem acinfe, for (z,0) |
| [in] | dacsups | idem dacinfe, for (z,0) |
| [in] | zray | altitude (physical mesh) |
| [in] | temray | temperature in Celsius |
| [in] | qvray | specific humidity for water vapor |
| [in] | qlray | specific humidity for liquid water |
| [in] | fnerir | cloud fraction |
| [in] | romray | air density |
| [in] | preray | pressure |
| [in] | aeroso | aerosol concentration in micro-g/m3 |
| [out] | foir | downward IR flux at the ground |
| [out] | rayi | IR flux divergence |
| [in] | ncray | Number of droplets interpolated on vertical grid |
1.8.16