$Id: pwl_nearest.f90 3093 2008-04-22 14:51:09Z sfilippo $
Description: Given an array X_DATA and a scalar X returns the subscripts of the two nearest elements in the data series.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=psb_dpk_), | intent(in) | :: | x | |||
| real(kind=psb_dpk_), | intent(in) | :: | x_data(:) | |||
| integer, | intent(out) | :: | i1 | |||
| integer, | intent(out) | :: | i2 |