Commit 9022b1e1 authored by dingwell's avatar dingwell
Browse files

Clarification of source of error message

parent 3859d163
......@@ -403,14 +403,14 @@
return
996 continue
write(*,*) '#####################################################'
write(*,*) '#### FLEXPART MODEL SUBROUTINE RELEASEPARTICLES: ####'
write(*,*) '#### ####'
write(*,*) '#### ERROR - TOTAL NUMBER OF PARTICLES REQUIRED ####'
write(*,*) '#### EXCEEDS THE MAXIMUM ALLOWED NUMBER. REDUCE ####'
write(*,*) '#### EITHER NUMBER OF PARTICLES PER RELEASE POINT####'
write(*,*) '#### OR REDUCE NUMBER OF RELEASE POINTS. ####'
write(*,*) '#####################################################'
write(*,*) '###########################################################'
write(*,*) '#### FLEXPART MODEL SUBROUTINE RELEASEPARTICLES_IRREG: ###'
write(*,*) '#### ####'
write(*,*) '#### ERROR - TOTAL NUMBER OF PARTICLES REQUIRED ####'
write(*,*) '#### EXCEEDS THE MAXIMUM ALLOWED NUMBER. REDUCE ####'
write(*,*) '#### EITHER NUMBER OF PARTICLES PER RELEASE POINT ####'
write(*,*) '#### OR REDUCE NUMBER OF RELEASE POINTS. ####'
write(*,*) '###########################################################'
stop
end subroutine releaseparticles_irreg
......
......@@ -418,14 +418,14 @@
return
996 continue
write(*,*) '#####################################################'
write(*,*) '#### FLEXPART MODEL SUBROUTINE RELEASEPARTICLES: ####'
write(*,*) '#### ####'
write(*,*) '#### ERROR - TOTAL NUMBER OF PARTICLES REQUIRED ####'
write(*,*) '#### EXCEEDS THE MAXIMUM ALLOWED NUMBER. REDUCE ####'
write(*,*) '#### EITHER NUMBER OF PARTICLES PER RELEASE POINT####'
write(*,*) '#### OR REDUCE NUMBER OF RELEASE POINTS. ####'
write(*,*) '#####################################################'
write(*,*) '#########################################################'
write(*,*) '#### FLEXPART MODEL SUBROUTINE RELEASEPARTICLES_REG: ####'
write(*,*) '#### ####'
write(*,*) '#### ERROR - TOTAL NUMBER OF PARTICLES REQUIRED ####'
write(*,*) '#### EXCEEDS THE MAXIMUM ALLOWED NUMBER. REDUCE ####'
write(*,*) '#### EITHER NUMBER OF PARTICLES PER RELEASE POINT ####'
write(*,*) '#### OR REDUCE NUMBER OF RELEASE POINTS. ####'
write(*,*) '#########################################################'
stop
end subroutine releaseparticles_reg
......
Supports Markdown
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