gfs_surface_composites_post_run()

subroutine, public gfs_surface_composites_post::gfs_surface_composites_post_run	(	integer, intent(in)	im,
		integer, intent(in)	kice,
		integer, intent(in)	km,
		real(kind=kind_phys), intent(in)	rd,
		real(kind=kind_phys), intent(in)	rvrdm1,
		logical, intent(in)	cplflx,
		logical, intent(in)	cplwav2atm,
		logical, intent(in)	frac_grid,
		logical, dimension(:), intent(in)	flag_cice,
		logical, intent(in)	thsfc_loc,
		integer, dimension(:), intent(in)	islmsk,
		logical, dimension(:), intent(in)	dry,
		logical, dimension(:), intent(inout)	wet,
		logical, dimension(:), intent(in)	icy,
		real(kind=kind_phys), dimension(:), intent(in)	wind,
		real(kind=kind_phys), dimension(:), intent(in)	t1,
		real(kind=kind_phys), dimension(:), intent(in)	q1,
		real(kind=kind_phys), dimension(:), intent(in)	prsl1,
		real(kind=kind_phys), dimension(:), intent(in)	landfrac,
		real(kind=kind_phys), dimension(:), intent(in)	lakefrac,
		real(kind=kind_phys), dimension(:), intent(in)	oceanfrac,
		real(kind=kind_phys), dimension(:), intent(inout)	zorl,
		real(kind=kind_phys), dimension(:), intent(in)	zorlo,
		real(kind=kind_phys), dimension(:), intent(in)	zorll,
		real(kind=kind_phys), dimension(:), intent(in)	zorli,
		real(kind=kind_phys), dimension(:), intent(in)	garea,
		logical, intent(in)	frac_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	cd,
		real(kind=kind_phys), dimension(:), intent(in)	cd_wat,
		real(kind=kind_phys), dimension(:), intent(in)	cd_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	cd_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	cdq,
		real(kind=kind_phys), dimension(:), intent(in)	cdq_wat,
		real(kind=kind_phys), dimension(:), intent(in)	cdq_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	cdq_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	rb,
		real(kind=kind_phys), dimension(:), intent(in)	rb_wat,
		real(kind=kind_phys), dimension(:), intent(in)	rb_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	rb_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	stress,
		real(kind=kind_phys), dimension(:), intent(in)	stress_wat,
		real(kind=kind_phys), dimension(:), intent(in)	stress_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	stress_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	ffmm,
		real(kind=kind_phys), dimension(:), intent(in)	ffmm_wat,
		real(kind=kind_phys), dimension(:), intent(in)	ffmm_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	ffmm_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	ffhh,
		real(kind=kind_phys), dimension(:), intent(in)	ffhh_wat,
		real(kind=kind_phys), dimension(:), intent(in)	ffhh_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	ffhh_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	uustar,
		real(kind=kind_phys), dimension(:), intent(in)	uustar_wat,
		real(kind=kind_phys), dimension(:), intent(in)	uustar_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	uustar_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	fm10,
		real(kind=kind_phys), dimension(:), intent(in)	fm10_wat,
		real(kind=kind_phys), dimension(:), intent(in)	fm10_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	fm10_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	fh2,
		real(kind=kind_phys), dimension(:), intent(in)	fh2_wat,
		real(kind=kind_phys), dimension(:), intent(in)	fh2_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	fh2_ice,
		real(kind=kind_phys), dimension(:), intent(in)	tsurf_wat,
		real(kind=kind_phys), dimension(:), intent(in)	tsurf_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	tsurf_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	cmm,
		real(kind=kind_phys), dimension(:), intent(in)	cmm_wat,
		real(kind=kind_phys), dimension(:), intent(in)	cmm_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	cmm_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	chh,
		real(kind=kind_phys), dimension(:), intent(in)	chh_wat,
		real(kind=kind_phys), dimension(:), intent(in)	chh_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	chh_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	gflx,
		real(kind=kind_phys), dimension(:), intent(in)	gflx_wat,
		real(kind=kind_phys), dimension(:), intent(in)	gflx_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	gflx_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	ep1d,
		real(kind=kind_phys), dimension(:), intent(in)	ep1d_wat,
		real(kind=kind_phys), dimension(:), intent(in)	ep1d_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	ep1d_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	weasd,
		real(kind=kind_phys), dimension(:), intent(in)	weasd_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	weasd_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	snowd,
		real(kind=kind_phys), dimension(:), intent(in)	snowd_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	snowd_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	tprcp,
		real(kind=kind_phys), dimension(:), intent(in)	tprcp_wat,
		real(kind=kind_phys), dimension(:), intent(in)	tprcp_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	tprcp_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	evap,
		real(kind=kind_phys), dimension(:), intent(in)	evap_wat,
		real(kind=kind_phys), dimension(:), intent(in)	evap_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	evap_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	hflx,
		real(kind=kind_phys), dimension(:), intent(in)	hflx_wat,
		real(kind=kind_phys), dimension(:), intent(in)	hflx_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	hflx_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	qss,
		real(kind=kind_phys), dimension(:), intent(in)	qss_wat,
		real(kind=kind_phys), dimension(:), intent(in)	qss_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	qss_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	tsfc,
		real(kind=kind_phys), dimension(:), intent(inout)	tsfco,
		real(kind=kind_phys), dimension(:), intent(inout)	tsfcl,
		real(kind=kind_phys), dimension(:), intent(in)	tsfc_wat,
		real(kind=kind_phys), dimension(:), intent(inout)	tisfc,
		real(kind=kind_phys), dimension(:), intent(inout)	hice,
		real(kind=kind_phys), dimension(:), intent(inout)	cice,
		real(kind=kind_phys), dimension(:,:), intent(in)	tiice,
		real(kind=kind_phys), dimension(:), intent(inout)	sigmaf,
		real(kind=kind_phys), dimension(:), intent(inout)	zvfun,
		logical, intent(in)	lheatstrg,
		real(kind=kind_phys), intent(in)	h0facu,
		real(kind=kind_phys), intent(in)	h0facs,
		real(kind=kind_phys), dimension(:), intent(inout)	hflxq,
		real(kind=kind_phys), dimension(:), intent(inout)	hffac,
		real(kind=kind_phys), dimension(:,:), intent(inout)	stc,
		integer, intent(in)	lkm,
		integer, intent(in)	iopt_lake,
		integer, intent(in)	iopt_lake_clm,
		integer, dimension(:), intent(in)	use_lake_model,
		real(kind=kind_phys), intent(in)	grav,
		real(kind=kind_phys), dimension(:), intent(in)	prsik1,
		real(kind=kind_phys), dimension(:), intent(in)	prslk1,
		real(kind=kind_phys), dimension(:), intent(in)	prslki,
		real(kind=kind_phys), dimension(:), intent(in)	z1,
		real(kind=kind_phys), dimension(:), intent(in)	ztmax_wat,
		real(kind=kind_phys), dimension(:), intent(in)	ztmax_lnd,
		real(kind=kind_phys), dimension(:), intent(in)	ztmax_ice,
		real(kind=kind_phys), intent(in)	huge,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)

Argument Table

References sfc_diff::stability().

Here is the call graph for this function: