Skip to content
Snippets Groups Projects
Commit dd4fdc31 authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann 🌱
Browse files

correct the verbose lvl

parent 656f670b
No related branches found
No related tags found
1 merge request!1Dev
Hide whitespace changes
Inline Side-by-side
Showing
with 2 additions and 2 deletions
src/basic_mod.F90
+ 2
− 2
View file @ dd4fdc31
......@@ -202,7 +202,7 @@ CONTAINS
WRITE(input_file,'(a,a1,i2.2,a3)') 'fort','_',fileid,'.90'
INQUIRE(file=input_file, exist=mlexist)
IF( mlexist ) THEN
CALL speak('Reading input '// input_file,1)
CALL speak('Reading input '// input_file,0)
OPEN(lu_in, file=input_file)
file_found = .true.
ELSE
......@@ -210,7 +210,7 @@ CONTAINS
WRITE(input_file,'(a,a1,i2.2,a3)') 'params','_',fileid,'.in'
INQUIRE(file=input_file, exist=mlexist)
IF( mlexist ) THEN
CALL speak('Reading input '// input_file,1)
CALL speak('Reading input '// input_file,0)
OPEN(lu_in, file=input_file)
file_found = .true.
ENDIF
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment