From fda9b469af204c8faa331dc4bc8e4d52e0e34e92 Mon Sep 17 00:00:00 2001 From: Ignacio Pisso <ip@nilu.no> Date: Sat, 14 Dec 2013 12:02:46 +0000 Subject: [PATCH] add verbose mode to version 9.1.7.1 git-svn-id: http://flexpart.flexpart.eu:8088/svn/FlexPart90/branches/flexpart91_hasod@18 ef8cc7e1-21b7-489e-abab-c1baa636049d --- src_parallel/readreleases.f90 | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src_parallel/readreleases.f90 b/src_parallel/readreleases.f90 index a62ef110..6a23c1b2 100755 --- a/src_parallel/readreleases.f90 +++ b/src_parallel/readreleases.f90 @@ -79,7 +79,8 @@ subroutine readreleases integer :: numpoints, parts, readerror integer*2 :: zkind integer :: idate1, itime1, idate2, itime2 - real :: lon1,lon2,lat1,lat2,z1,z2,mass(nspec) + real :: lon1,lon2,lat1,lat2,z1,z2 !,mass(nspec) + real :: mass(45) character*40 :: comment ! declare namelists -- GitLab