USER_PROBLEM: Remove printing of empty line.

Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
Grzegorz Kowal 2017-05-11 09:57:25 -03:00
parent 5a10b9384d
commit 9ed6f2ad1c

View File

@ -116,7 +116,6 @@ module user_problem
! !
if (verbose) then if (verbose) then
write (*,*)
write (*,"(1x,a)") "User problem:" write (*,"(1x,a)") "User problem:"
write (*,"(4x,a14, 9x,'=',2x,a)") "problem name ", trim(problem_name) write (*,"(4x,a14, 9x,'=',2x,a)") "problem name ", trim(problem_name)