[cdftools] 137/228: JMM : final touch to cdfprofile with -dep option

Alastair McKinstry mckinstry at moszumanska.debian.org
Fri Jun 12 08:21:40 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 23a889dd82bdc5182c3066514b4f667971d64eb5
Author: molines <molines at 1055176f-818a-41d9-83e1-73fbe5b947c5>
Date:   Wed Apr 4 11:42:42 2012 +0000

    JMM : final touch to cdfprofile with  -dep option
    
    
    git-svn-id: http://servforge.legi.grenoble-inp.fr/svn/CDFTOOLS/trunk@585 1055176f-818a-41d9-83e1-73fbe5b947c5
---
 cdfprofile.f90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/cdfprofile.f90 b/cdfprofile.f90
index c8f1a11..506399b 100644
--- a/cdfprofile.f90
+++ b/cdfprofile.f90
@@ -165,6 +165,7 @@ PROGRAM cdfprofile
      IF ( l_vert_interp ) THEN
        rdummy(1,1) = vinterp (rprofile, gdept , rdep, npk )
        ierr        = putvar(ncout, id_varout(1), rdummy, 1, ikx, iky, ktime=jt)
+       PRINT *, ' Interpolated value is : ', rdummy(1,1)
      ENDIF
 
      ! Ascii output

-- 
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