lin_extrapolate.pro

来自「IDL语言编写的用于天文自适应光学仿真的软件CAOS V6.0的第一部分。」· PRO 代码 · 共 12 行

; $Id: lin_extrapolate.pro,v 1.2 2002/03/14 11:49:13 riccardi Exp $

function lin_extrapolate, x, y
	n = n_elements(y)
	if (n_elements(x) le n) or (n lt 2) then stop

	return, (y(n-1)-y(n-2))/(x(n-1)-x(n-2))*(x(n)-x(n-1))+y(n-1)
end