buoyancy_plumerise()

subroutine module_smoke_plumerise::buoyancy_plumerise	(	integer	m1,
		real(kind=kind_phys), dimension(m1)	t,
		real(kind=kind_phys), dimension(m1)	te,
		real(kind=kind_phys), dimension(m1)	qv,
		real(kind=kind_phys), dimension(m1)	qvenv,
		real(kind=kind_phys), dimension(m1)	qh,
		real(kind=kind_phys), dimension(m1)	qi,
		real(kind=kind_phys), dimension(m1)	qc,
		real(kind=kind_phys), dimension(m1)	wt,
		real(kind=kind_phys), dimension(m1)	scr1
	)