subroutine subst	(	real (kind=kind_io8), dimension(imax,jmax)	data,
		integer	imax,
		integer	jmax,
		real (kind=kind_io8)	dlon,
		real (kind=kind_io8)	dlat,
		logical	ijordr
	)

Referenced by fixrda(), and fixrdc().