fcn_hybrj Abstract Interface

abstract interface
public subroutine fcn_hybrj(n, x, fvec, fjac, ldfjac, iflag)

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: n

the number of variables.

real(kind=wp), intent(in), dimension(n):: x

independent variable vector

real(kind=wp), intent(inout), dimension(n):: fvec

value of function at x

real(kind=wp), intent(inout), dimension(ldfjac, n):: fjac

jacobian matrix at x

integer, intent(in) :: ldfjac

leading dimension of the array fjac.

integer, intent(inout) :: iflag

if iflag = 1 calculate the functions at x and return this vector in fvec. do not alter fjac. if iflag = 2 calculate the jacobian at x and return this matrix in fjac. do not alter fvec.

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

Description

user-supplied subroutine for hybrj and hybrj1