We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent ae7b7b6 commit 86d42cfCopy full SHA for 86d42cf
app/inputs.f90
@@ -126,7 +126,7 @@ subroutine set_global_vars()
126
write(0,'("&
127
&ERROR: No input filename supplied, &
128
&but the flag ''-f'' was used&
129
- &")')
+ &")')
130
infilename_do: do j = 1, 3
131
write(6,'("Please supply an input filename:")')
132
read(5,'(A)') input_file
@@ -157,7 +157,7 @@ subroutine set_global_vars()
157
write(6,'("-----------------FILE-NAME-FLAGS-----------------")')
158
write(6,'(2X,"-f<STR> : Input structure file name (&
159
&Default = (empty)&
160
- &).")')
+ &).")')
161
stop
162
end if
163
end do flagloop
0 commit comments