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
	)

Parameters

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)

getozn General Algorithm