cool_skin()

subroutine nst_module::cool_skin	(	real(kind=kind_phys), intent(in)	ustar_a,
		real(kind=kind_phys), intent(in)	f_nsol,
		real(kind=kind_phys), intent(in)	f_sol_0,
		real(kind=kind_phys), intent(in)	evap,
		real(kind=kind_phys), intent(in)	sss,
		real(kind=kind_phys), intent(in)	alpha,
		real(kind=kind_phys), intent(in)	beta,
		real(kind=kind_phys), intent(in)	rho_w,
		real(kind=kind_phys), intent(in)	rho_a,
		real(kind=kind_phys), intent(in)	ts,
		real(kind=kind_phys), intent(in)	q_ts,
		real(kind=kind_phys), intent(in)	hl_ts,
		real(kind=kind_phys), intent(in)	grav,
		real(kind=kind_phys), intent(in)	le,
		real(kind=kind_phys), intent(out)	deltat_c,
		real(kind=kind_phys), intent(out)	z_c,
		real(kind=kind_phys), intent(out)	c_0,
		real(kind=kind_phys), intent(out)	c_d
	)

Referenced by sfc_nst::sfc_nst_run().

Here is the caller graph for this function: