interpo_search_1d Subroutine

public subroutine interpo_search_1d(x, point, i, undeff, stdopt)

Floor function for the real grid points (from STPK)

Arguments

Type IntentOptional Attributes Name
double precision, intent(in) :: x(:)

X-coordinate

double precision, intent(in) :: point

The X point in real

integer, intent(out) :: i

floor(pointx)

integer, intent(in), optional :: undeff

In case of (x(1)>pointx or y(1)>pointy), the value returned to i and j (default = 0)

logical, intent(in), optional :: stdopt

Display debug messages (default = .false. = Not display)