subroutine sfc_nst_pre::sfc_nst_pre_run	(	integer, intent(in)	im,
		integer, dimension(im), intent(in)	islimsk,
		real (kind=kind_phys), dimension(im), intent(in)	oro,
		real (kind=kind_phys), dimension(im), intent(in)	oro_uf,
		real (kind=kind_phys), dimension(im), intent(in)	tsfc,
		real (kind=kind_phys), dimension(im), intent(inout)	tsurf,
		real (kind=kind_phys), dimension(im), intent(out)	tskin,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)

General Algorithm

References physcons::rlapse.