subroutine calwxt_ramer	(	integer, intent(in)	lm,
		integer, intent(in)	lp1,
		real, dimension(lm), intent(in)	t,
		real, dimension(lm), intent(in)	q,
		real, dimension(lm), intent(in)	pmid,
		real, dimension(lm), intent(in)	rh,
		real, dimension(lm), intent(in)	td,
		real, dimension(lp1), intent(in)	pint,
		integer, intent(out)	ptyp
	)

Referenced by calpreciptype().