qsat()

subroutine clm_lake::qsat ( real(kind_lake), intent(in)  T, real(kind_lake), intent(in)  p, real(kind_lake), intent(out)  es, real(kind_lake), intent(out)  esdT, real(kind_lake), intent(out)  qs, real(kind_lake), intent(out)  qsdT  )

private

Parameters

[in]	t	temperature (K)
[in]	p	surface atmospheric pressure (pa)
[out]	es	vapor pressure (pa)
[out]	esdt	d(es)/d(T)
[out]	qs	humidity (kg/kg)
[out]	qsdt	d(qs)/d(T)