fcn_lmstr Abstract Interface

  1. minpack.f90
  2. minpack_module
  3. fcn_lmstr

abstract interface
public subroutine fcn_lmstr(m, n, x, fvec, fjrow, iflag)

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: m

the number of functions.
integer, intent(in) :: n

the number of variables.
real(kind=wp), intent(in) :: x(n)

independent variable vector
real(kind=wp), intent(inout) :: fvec(m)

value of function at x
real(kind=wp), intent(inout) :: fjrow(n)

jacobian row
integer, intent(inout) :: iflag

if iflag = 1 calculate the functions at x and return this vector in fvec. if iflag = i calculate the (i-1)-st row of the jacobian at x and return this vector in fjrow.

the value of iflag should not be changed by fcn unless the user wants to terminate execution of lmstr. in this case set iflag to a negative integer.