Compute the absorption of shortwave radiation and initialize arrays for longwave-radiation routines
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real, | intent(in) | :: | psa(ix,il) | Normalised surface pressure [p/p0] |
||
real, | intent(in) | :: | qa(ix,il,kx) | Specific humidity [g/kg] |
||
integer, | intent(in) | :: | icltop(ix,il) | Cloud top level |
||
real, | intent(in) | :: | cloudc(ix,il) | Total cloud cover |
||
real, | intent(in) | :: | clstr(ix,il) | Stratiform cloud cover |
||
real, | intent(out) | :: | fsfcd(ix,il) | Total downward flux of short-wave radiation at the surface |
||
real, | intent(out) | :: | fsfc(ix,il) | Net downward flux of short-wave radiation at the surface |
||
real, | intent(out) | :: | ftop(ix,il) | Net downward flux of short-wave radiation at the top of the atmosphere |
||
real, | intent(out) | :: | dfabs(ix,il,kx) | Flux of short-wave radiation absorbed in each atmospheric layer |