subroutine cnvc90::cnvc90_run	(	real(kind=kind_phys), intent(in)	CLSTP,
		integer, intent(in)	IM,
		real(kind=kind_phys), dimension(im), intent(in)	RN,
		integer, dimension(im), intent(in)	KBOT,
		integer, dimension(im), intent(in)	KTOP,
		integer, intent(in)	KM,
		real(kind=kind_phys), dimension(im,km+1), intent(in)	PRSI,
		real(kind=kind_phys), dimension(im), intent(inout)	ACV,
		real(kind=kind_phys), dimension(im), intent(inout)	ACVB,
		real(kind=kind_phys), dimension(im), intent(inout)	ACVT,
		real(kind=kind_phys), dimension(im), intent(inout)	CV,
		real(kind=kind_phys), dimension(im), intent(inout)	CVB,
		real(kind=kind_phys), dimension(im), intent(inout)	CVT,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)