Skip to content
Snippets Groups Projects
Commit cd1f691a authored by Ignacio Pisso's avatar Ignacio Pisso
Browse files

correct error message in readcommand.f90: IPOUT MUST BE 0, 1, or 2

parent 18c1336f
No related branches found
No related tags found
No related merge requests found
Show whitespace changes
Inline Side-by-side
Showing
with 1 addition and 1 deletion
src/readcommand.f90
+ 1
− 1
View file @ cd1f691a
...@@ -443,7 +443,7 @@ subroutine readcommand ...@@ -443,7 +443,7 @@ subroutine readcommand
if ((ipout.ne.0).and.(ipout.ne.1).and.(ipout.ne.2)) then if ((ipout.ne.0).and.(ipout.ne.1).and.(ipout.ne.2)) then
write(*,*) ' #### FLEXPART MODEL ERROR! FILE COMMAND: #### ' write(*,*) ' #### FLEXPART MODEL ERROR! FILE COMMAND: #### '
write(*,*) ' #### IPOUT MUST BE 1, 2 OR 3! #### ' write(*,*) ' #### IPOUT MUST BE 0, 1, or 2! #### '
stop stop
endif endif
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment