Skip to content

Commit cd7bb38

Browse files
awvwgkivan-pi
andauthored
Fix typo
Co-authored-by: Ivan Pribec <[email protected]>
1 parent bb95e7e commit cd7bb38

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/minpack.f90

+1-1
Original file line numberDiff line numberDiff line change
@@ -97,7 +97,7 @@ subroutine fcn_lmstr(m, n, x, fvec, fjrow, iflag)
9797
!! the value of iflag should not be changed by fcn unless
9898
!! the user wants to terminate execution of lmstr.
9999
!! in this case set iflag to a negative integer.
100-
real(wp), intent(in) :: x(n) !! independant variable vector
100+
real(wp), intent(in) :: x(n) !! independent variable vector
101101
real(wp), intent(inout) :: fvec(m) !! value of function at `x`
102102
real(wp), intent(inout) :: fjrow(n) !! jacobian row
103103
end subroutine fcn_lmstr

0 commit comments

Comments
 (0)