[cdftools] 21/228: bug in cdfhflx about netcdf writing whan newmask_glo is present

[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 a0edd58aba55cb868bafbeec71a0dffef47235c8
Author: dussin9r <dussin9r at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date:   Wed Mar 24 15:35:52 2010 +0000

    bug in cdfhflx about netcdf writing whan newmask_glo is present
    
    
    git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@297 1055176f-818a-41d9-83e1-73fbe5b947c5
---
 cdfhflx.f90 | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/cdfhflx.f90 b/cdfhflx.f90
index 50b0384..753eb0f 100644
--- a/cdfhflx.f90
+++ b/cdfhflx.f90
@@ -137,21 +137,21 @@ PROGRAM cdfhflx
 
      IF (llglo) THEN
 
-        typvar(1)%name='hflx_atl'
-        typvar(1)%long_name='Heat_Fluxes_Atlantic'
-        typvar(1)%short_name='hflx_atl'
+        typvar(2)%name='hflx_atl'
+        typvar(2)%long_name='Heat_Fluxes_Atlantic'
+        typvar(2)%short_name='hflx_atl'
 
-        typvar(2)%name='hflx_indopacif'
-        typvar(2)%long_name='Heat_Fluxes_Indo-Pacific'
-        typvar(2)%short_name='hflx_indopacif'
+        typvar(3)%name='hflx_indopacif'
+        typvar(3)%long_name='Heat_Fluxes_Indo-Pacific'
+        typvar(3)%short_name='hflx_indopacif'
 
-        typvar(3)%name='hflx_indian'
-        typvar(3)%long_name='Heat_Fluxes_Indian'
-        typvar(3)%short_name='hflx_indian'
+        typvar(4)%name='hflx_indian'
+        typvar(4)%long_name='Heat_Fluxes_Indian'
+        typvar(4)%short_name='hflx_indian'
 
-        typvar(4)%name='hflx_pacif'
-        typvar(4)%long_name='Heat_Fluxes_Pacific'
-        typvar(4)%short_name='hflx_pacif'
+        typvar(5)%name='hflx_pacif'
+        typvar(5)%long_name='Heat_Fluxes_Pacific'
+        typvar(5)%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