subroutine gfs_stochastics::gfs_stochastics_run	(	integer, intent(in)	im,
		integer, intent(in)	km,
		logical, intent(in)	do_sppt,
		logical, intent(in)	use_zmtnblck,
		logical, intent(in)	do_shum,
		logical, intent(in)	do_skeb,
		real(kind_phys), dimension(1:im), intent(in)	zmtnblck,
		real(kind_phys), dimension(:,:), intent(inout)	sppt_wts,
		real(kind_phys), dimension(:,:), intent(in)	skebu_wts,
		real(kind_phys), dimension(:,:), intent(in)	skebv_wts,
		real(kind_phys), dimension(:,:), intent(in)	shum_wts,
		real(kind_phys), dimension(1:im,1:km), intent(inout)	sppt_wts_inv,
		real(kind_phys), dimension(1:im,1:km), intent(inout)	skebu_wts_inv,
		real(kind_phys), dimension(1:im,1:km), intent(inout)	skebv_wts_inv,
		real(kind_phys), dimension(1:im,1:km), intent(inout)	shum_wts_inv,
		real(kind_phys), dimension(1:im,1:km), intent(in)	diss_est,
		real(kind_phys), dimension(1:im,1:km), intent(in)	ugrs,
		real(kind_phys), dimension(1:im,1:km), intent(in)	vgrs,
		real(kind_phys), dimension(1:im,1:km), intent(in)	tgrs,
		real(kind_phys), dimension(1:im,1:km), intent(in)	qgrs,
		real(kind_phys), dimension(1:im,1:km), intent(inout)	gu0,
		real(kind_phys), dimension(1:im,1:km), intent(inout)	gv0,
		real(kind_phys), dimension(1:im,1:km), intent(inout)	gt0,
		real(kind_phys), dimension(1:im,1:km), intent(inout)	gq0,
		real(kind_phys), dimension(:,:), intent(in)	dtdtr,
		real(kind_phys), dimension(1:im), intent(in)	rain,
		real(kind_phys), dimension(1:im), intent(in)	rainc,
		real(kind_phys), dimension(1:im), intent(inout)	tprcp,
		real(kind_phys), dimension(1:im), intent(inout)	totprcp,
		real(kind_phys), dimension(1:im), intent(inout)	cnvprcp,
		real(kind_phys), dimension(1:im), intent(inout)	totprcpb,
		real(kind_phys), dimension(1:im), intent(inout)	cnvprcpb,
		logical, intent(in)	cplflx,
		real(kind_phys), dimension(:), intent(inout)	rain_cpl,
		real(kind_phys), dimension(:), intent(inout)	snow_cpl,
		real(kind_phys), dimension(:), intent(in)	drain_cpl,
		real(kind_phys), dimension(:), intent(in)	dsnow_cpl,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)