diff --git a/src_parallel/readreleases.f90 b/src_parallel/readreleases.f90 index a62ef110ceb84451260672a0b912c10e839a6474..6a23c1b2164437f26f64d5f73b41a364e13115f6 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