aerinterpol()

subroutine, public aerinterp::aerinterpol	(	integer	me,
		integer	master,
		integer	nthrds,
		integer	npts,
		integer, dimension(4)	IDATE,
		real(kind=kind_phys)	FHOUR,
		integer, intent(in)	iflip,
		integer, dimension(npts)	jindx1,
		integer, dimension(npts)	jindx2,
		real(kind=kind_phys), dimension(npts)	ddy,
		integer, dimension(npts)	iindx1,
		integer, dimension(npts)	iindx2,
		real(kind=kind_phys), dimension(npts)	ddx,
		integer	lev,
		real(kind=kind_phys), dimension(npts,lev)	prsl,
		real(kind=kind_phys), dimension(npts,lev,ntrcaer)	aerout
	)