◆ psub()

real(kind_phys) function gfdl_cloud_microphys_v3_mod::psub	(	real(kind_phys), intent(in)	t2,
		real(kind_phys), intent(in)	dq,
		real(kind_phys), intent(in)	qden,
		real(kind_phys), intent(in)	qsat,
		real(kind_phys), dimension (5), intent(in)	c,
		real(kind_phys), intent(in)	den,
		real(kind_phys), intent(in)	denfac,
		real(kind_phys), intent(in)	blin,
		real(kind_phys), intent(in)	mu,
		real(kind_phys), intent(in)	cpk,
		real (kind = r8), intent(in)	cvm
	)

private