Skip to content

Commit

Permalink
Fix typo
Browse files Browse the repository at this point in the history
Co-authored-by: Ivan Pribec <ivan.pribec@gmail.com>
  • Loading branch information
awvwgk and ivan-pi authored Feb 6, 2022
1 parent bb95e7e commit cd7bb38
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/minpack.f90
Original file line number Diff line number Diff line change
Expand Up @@ -97,7 +97,7 @@ subroutine fcn_lmstr(m, n, x, fvec, fjrow, iflag)
!! 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.
real(wp), intent(in) :: x(n) !! independant variable vector
real(wp), intent(in) :: x(n) !! independent variable vector
real(wp), intent(inout) :: fvec(m) !! value of function at `x`
real(wp), intent(inout) :: fjrow(n) !! jacobian row
end subroutine fcn_lmstr
Expand Down

0 comments on commit cd7bb38

Please sign in to comment.