Changeset cd1f691 in flexpart.git for src/readcommand.f90


Ignore:
Timestamp:
Mar 1, 2015, 4:26:38 PM (9 years ago)
Author:
Ignacio Pisso <Ignacio.Pisso@…>
Branches:
master, 10.4.1_pesei, FPv9.3.1, FPv9.3.1b_testing, FPv9.3.2, GFS_025, bugfixes+enhancements, dev, fp9.3.1-20161214-nc4, grib2nc4_repair, release-10, release-10.4.1, scaling-bug, univie
Children:
da396a2
Parents:
18c1336
git-author:
Ignacio Pisso <Ignacio.Pisso@…> (03/01/15 16:03:21)
git-committer:
Ignacio Pisso <Ignacio.Pisso@…> (03/01/15 16:26:38)
Message:

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

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/readcommand.f90

    rb4d29ce rcd1f691  
    444444  if ((ipout.ne.0).and.(ipout.ne.1).and.(ipout.ne.2)) then
    445445    write(*,*) ' #### FLEXPART MODEL ERROR! FILE COMMAND:     #### '
    446     write(*,*) ' #### IPOUT MUST BE 1, 2 OR 3!                #### '
     446    write(*,*) ' #### IPOUT MUST BE 0, 1, or 2!                #### '
    447447    stop
    448448  endif
Note: See TracChangeset for help on using the changeset viewer.
hosted by ZAMG