subroutine diff_1d_wtend	(	integer	levs,
		real(kind=kind_phys)	dt,
		real(kind=kind_phys), dimension(levs)	F,
		real(kind=kind_phys), dimension(levs)	F1,
		real(kind=kind_phys), dimension(levs)	Km,
		real(kind=kind_phys), dimension(levs)	rdp,
		real(kind=kind_phys), dimension(levs-1)	rdpm,
		real(kind=kind_phys), dimension(levs)	S,
		real(kind=kind_phys), dimension(levs)	S1
	)

Referenced by edmix_ugwp_v0().