[cdftools] 100/228: RD: bugfix in cdfmean, missing IF( lvar ) line 368
Alastair McKinstry
mckinstry at moszumanska.debian.org
Fri Jun 12 08:21:35 UTC 2015
This is an automated email from the git hooks/post-receive script.
mckinstry pushed a commit to branch master
in repository cdftools.
commit 07fb2b9264ecd1322b6f420022d47c5c4d15f996
Author: dussin <dussin at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date: Fri Aug 19 14:56:33 2011 +0000
RD: bugfix in cdfmean, missing IF( lvar ) line 368
git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@547 1055176f-818a-41d9-83e1-73fbe5b947c5
---
cdfmean.f90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/cdfmean.f90 b/cdfmean.f90
index a5f227c..34bf991 100644
--- a/cdfmean.f90
+++ b/cdfmean.f90
@@ -368,7 +368,7 @@ PROGRAM cdfmean
ELSE
WRITE(6,*) ' No points in the water at level ',ik,'(',gdep(ik),' m) '
dvmeanout(jk) = 99999.
- dvariance(jk) = 99999.
+ IF( lvar ) dvariance(jk) = 99999.
ENDIF
rdummymean(1,1) = dvmeanout(jk)
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-science/packages/cdftools.git
More information about the debian-science-commits
mailing list