; Ed Esfandiari
; perform a simple linear interpolation.

pro linear_interp,x1, y1, x2, y2, x, y

  s = (y2 - y1)/(x2 - x1)
  y = s * (x - x1) + y1

  Return
End