gfs_rrtmg_post_run()

subroutine gfs_rrtmg_post::gfs_rrtmg_post_run	(	integer, intent(in)	im,
		integer, intent(in)	km,
		integer, intent(in)	kmp1,
		integer, intent(in)	lm,
		integer, intent(in)	ltp,
		integer, intent(in)	kt,
		integer, intent(in)	kb,
		integer, intent(in)	kd,
		integer, intent(in)	nspc1,
		integer, intent(in)	nfxr,
		integer, intent(in)	nday,
		logical, intent(in)	lsswr,
		logical, intent(in)	lslwr,
		logical, intent(in)	lssav,
		real(kind=kind_phys), intent(in)	fhlwr,
		real(kind=kind_phys), intent(in)	fhswr,
		real(kind=kind_phys), intent(in)	raddt,
		real(kind=kind_phys), dimension(im), intent(in)	coszen,
		real(kind=kind_phys), dimension(im), intent(in)	coszdg,
		real(kind=kind_phys), dimension(im,kmp1), intent(in)	prsi,
		real(kind=kind_phys), dimension(im,km), intent(in)	tgrs,
		real(kind=kind_phys), dimension(im,nspc1), intent(in)	aerodp,
		real(kind=kind_phys), dimension(im,5), intent(in)	cldsa,
		integer, dimension(im,3), intent(in)	mtopa,
		integer, dimension(im,3), intent(in)	mbota,
		real(kind=kind_phys), dimension(im,lm+ltp), intent(in)	clouds1,
		real(kind=kind_phys), dimension(im,lm+ltp), intent(in)	cldtaulw,
		real(kind=kind_phys), dimension(im,lm+ltp), intent(in)	cldtausw,
		type(sfcflw_type), dimension(im), intent(in)	sfcflw,
		type(sfcfsw_type), dimension(im), intent(in)	sfcfsw,
		type(topflw_type), dimension(im), intent(in)	topflw,
		type(topfsw_type), dimension(im), intent(in)	topfsw,
		type(cmpfsw_type), dimension(im), intent(in)	scmpsw,
		real(kind=kind_phys), dimension(im,nfxr), intent(inout)	fluxr,
		real(kind=kind_phys), dimension(im), intent(inout)	total_albedo,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg )