diff --git a/src/user_problem.F90 b/src/user_problem.F90 index 451efb8..6024fdb 100644 --- a/src/user_problem.F90 +++ b/src/user_problem.F90 @@ -249,7 +249,6 @@ module user_problem ! if (verbose) then - write (*,*) write (*,"(1x,a)") "User problem:" sfmts = "(4x,a14,9x,'=',2x,a)" write (*,sfmts) "problem name ", trim(problem_name)