subroutine, public module_radiation_gases::getozn | ( | real (kind=kind_phys), dimension(:,:), intent(in) | prslk, |
real (kind=kind_phys), dimension(:), intent(in) | xlat, | ||
integer, intent(in) | IMAX, | ||
integer, intent(in) | LM, | ||
real (kind=kind_phys), dimension(:,:), intent(out) | o3mmr | ||
) |
prslk | (IMAX,LM), exner function = \((p/p0)^{rocp}\) |
xlat | (IMAX), latitude in radians, default to pi/2 -> -pi/2 range, otherwise see in-line comment |
IMAX,LM | horizontal and vertical dimensions |
o3mmr | (IMAX,LM), output ozone profile in mass mixing ratio (g/g) |
References facoz, physparam::ivflip, k1oz, k2oz, o3r, pkstr, and raddeg.