Skip to content

Commit

Permalink
Match buildmsg/printmsg "print level"
Browse files Browse the repository at this point in the history
The requested print level of `buildmsg` and `printmsg` should match,
  • Loading branch information
talassio authored Aug 27, 2019
1 parent a0fddef commit df4091f
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion libRALFit/src/ral_nlls_internal.f90
Original file line number Diff line number Diff line change
Expand Up @@ -1152,7 +1152,7 @@ RECURSIVE SUBROUTINE calculate_step(J,f,hf,g,X,md,md_gn,n,m,use_second_derivativ

if (buildmsg(5,.False.,options)) then
Write(rec(1), Fmt=3040)
Call printmsg(3,.False.,options,1,rec)
Call printmsg(5,.False.,options,1,rec)
end if
end if

Expand Down

0 comments on commit df4091f

Please sign in to comment.