gfs_surface_loop_control_part1_run()

subroutine gfs_surface_loop_control_part1::gfs_surface_loop_control_part1_run	(	integer, intent(in)	im,
		integer, intent(in)	iter,
		real(kind=kind_phys), dimension(:), intent(in)	wind,
		logical, dimension(:), intent(inout)	flag_guess,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg )

Arguments