[cdftools] 17/228: RD fix a typo in cdf output for cdfhflx

[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 4e2ad502385cbcb643b29ba5737b741af2097b58
Author: molines <molines at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date:   Thu Mar 11 10:38:24 2010 +0000

    RD fix a typo in cdf output for cdfhflx
    
    
    git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@293 1055176f-818a-41d9-83e1-73fbe5b947c5
---
 cdfhflx.f90 | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/cdfhflx.f90 b/cdfhflx.f90
index d309e5f..50b0384 100644
--- a/cdfhflx.f90
+++ b/cdfhflx.f90
@@ -141,17 +141,17 @@ PROGRAM cdfhflx
         typvar(1)%long_name='Heat_Fluxes_Atlantic'
         typvar(1)%short_name='hflx_atl'
 
-        typvar(1)%name='hflx_indopacif'
-        typvar(1)%long_name='Heat_Fluxes_Indo-Pacific'
-        typvar(1)%short_name='hflx_indopacif'
+        typvar(2)%name='hflx_indopacif'
+        typvar(2)%long_name='Heat_Fluxes_Indo-Pacific'
+        typvar(2)%short_name='hflx_indopacif'
 
-        typvar(1)%name='hflx_indian'
-        typvar(1)%long_name='Heat_Fluxes_Indian'
-        typvar(1)%short_name='hflx_indian'
+        typvar(3)%name='hflx_indian'
+        typvar(3)%long_name='Heat_Fluxes_Indian'
+        typvar(3)%short_name='hflx_indian'
 
-        typvar(1)%name='hflx_pacif'
-        typvar(1)%long_name='Heat_Fluxes_Pacific'
-        typvar(1)%short_name='hflx_pacif'
+        typvar(4)%name='hflx_pacif'
+        typvar(4)%long_name='Heat_Fluxes_Pacific'
+        typvar(4)%short_name='hflx_pacif'
 
      ENDIF
   ENDIF

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