least_val Subroutine

public subroutine least_val(nterms, b, c, d, x, px)

LEAST_VAL evaluates a least squares polynomial defined by LEAST_SET.

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=4)				::	nterms
real(kind=8)				::	b(nterms)
real(kind=8)				::	c(nterms)
real(kind=8)				::	d(nterms)
real(kind=8)				::	x
real(kind=8)				::	px