[cdftools] 210/228: JMM : cdfrhoproj improve documentation and stop after writing isopycn depth when -isodep is used.

[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 4f73d790c034eee7905297cfc09abf7d0d1fa4c3
Author: molines <molines at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date:   Wed May 22 15:55:18 2013 +0000

    JMM : cdfrhoproj  improve documentation and stop after writing isopycn depth when -isodep is used.
    
    
    git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@658 1055176f-818a-41d9-83e1-73fbe5b947c5
---
 cdfrhoproj.f90 | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/cdfrhoproj.f90 b/cdfrhoproj.f90
index a44207a..a97b456 100644
--- a/cdfrhoproj.f90
+++ b/cdfrhoproj.f90
@@ -94,12 +94,15 @@ PROGRAM cdfrhoproj
      PRINT *,'                    default is ''T''.'
      PRINT *,'       [-sig sigma_name] : name of the density variable in RHO_file.'
      PRINT *,'                    default is ', TRIM(cv_sig)
-     PRINT *,'       [-isodep ] : only compute the isopycnal depth. In this case you must'
-     PRINT *,'                    still specify a IN-var variable (in fact a dummy name).'
+     PRINT *,'       [-isodep ] : only compute the isopycnal depth. then stop. In this case'
+     PRINT *,'                    you must still specify a IN-var variable (in fact a dummy'
+     PRINT *,'                     name).'
      PRINT *,'      '
      PRINT *,'     REQUIRED FILES :'
      PRINT *,'       no metrics, information is taken from depth variable in input files.'
      PRINT *,'       ', TRIM(cf_rholev),' if not using -s0 option.'
+     PRINT *,'       ', TRIM(cf_rholev),' is an ascii file, first line giving the number of isopycnal'
+     PRINT *,'                           following lines with isopycnal value, 1 per line.'
      PRINT *,'      '
      PRINT *,'     OUTPUT : '
      PRINT *,'       There are as many output files as input files.'
@@ -250,6 +253,7 @@ PROGRAM cdfrhoproj
         ierr = putvar(ncout, id_varout(1), zint , jsig, npiglo, npjglo)
      END DO
      ierr = closeout(ncout    )
+     STOP ' -isodep option in use: only compute depth of isopycnal surfaces.'
   ENDIF
 
   !! ** Loop on the scalar files to project on choosen isopycnics surfaces
@@ -309,6 +313,7 @@ PROGRAM cdfrhoproj
        ENDIF
      END DO
      stypvar(2)%clong_name        = TRIM(stypvar(2)%clong_name)//' on iso sigma'
+     stypvar(2)%rmissing_value    = zspvalo
      stypvar(2)%caxis             = 'TRYX'
 
      stypvar(1)%cname             = cn_vodepiso

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