[cdftools] 148/228: JMM : bug fix for -zeromean option in cdfmean ( duplicate allocation)

[Alastair McKinstry]

This is an automated email from the git hooks/post-receive script.

mckinstry pushed a commit to branch master
in repository cdftools.

commit c435f7b87de48b3885164c1d03c4ad6f4f2d2233
Author: molines <molines at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date:   Wed Apr 25 19:31:09 2012 +0000

    JMM : bug fix for -zeromean option in cdfmean ( duplicate allocation)
    
    
    git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@596 1055176f-818a-41d9-83e1-73fbe5b947c5
---
 cdfmean.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cdfmean.f90 b/cdfmean.f90
index b9cad74..775fa3f 100644
--- a/cdfmean.f90
+++ b/cdfmean.f90
@@ -410,7 +410,7 @@ PROGRAM cdfmean
 
     ! re-read file and rest mean value from the variable and store on file
     nvars = getnvar(cf_in)
-    ALLOCATE ( stypvarin(nvars), cv_names(nvars), stypvarzero(1) )
+    ALLOCATE ( stypvarin(nvars), cv_names(nvars)    )
     ALLOCATE ( id_varout(1), ipk(1), stypvarzero(1) )
     cv_names(:) = getvarname(cf_in, nvars, stypvarin)
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-science/packages/cdftools.git