From 406a57609c874e732c29907952be86ff8236ad10 Mon Sep 17 00:00:00 2001
From: Uwe Schulzweida <uwe.schulzweida@mpimet.mpg.de>
Date: Thu, 11 Jun 2009 08:14:24 +0000
Subject: [PATCH] Version 1.3.2 released
---
ChangeLog | 2 +-
src/cdi.inc | 13 +++++++++++--
src/cdiFortran.c | 2 ++
3 files changed, 14 insertions(+), 3 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 6e14033ae..1eae8f3e7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,4 +1,4 @@
-2009-??-?? Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
+2009-06-10 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* added env CDI_SORTNAME to sort netCDF names
* added support for rotated grids on south pole [request: Beate Geyer]
diff --git a/src/cdi.inc b/src/cdi.inc
index 43be7b327..02b4d9aae 100644
--- a/src/cdi.inc
+++ b/src/cdi.inc
@@ -1,10 +1,10 @@
! This file was automatically created, don't edit!
!
-! Fortran interface for CDI library version 1.3.0
+! Fortran interface for CDI library version 1.3.2
!
! Author:
! -------
-! Uwe Schulzweida, MPI-MET, Hamburg, April 2009
+! Uwe Schulzweida, MPI-MET, Hamburg, June 2009
!
INTEGER CDI_UNDEFID
@@ -1178,6 +1178,15 @@
! DOUBLEPRECISION angle)
EXTERNAL gridDefAngle
+ DOUBLEPRECISION gridInqNpole
+! (INTEGER gridID)
+ EXTERNAL gridInqNpole
+
+! gridDefNpole
+! (INTEGER gridID,
+! DOUBLEPRECISION npole)
+ EXTERNAL gridDefNpole
+
! gridDefTrunc
! (INTEGER gridID,
! INTEGER trunc)
diff --git a/src/cdiFortran.c b/src/cdiFortran.c
index 7327843d5..17c4c0360 100644
--- a/src/cdiFortran.c
+++ b/src/cdiFortran.c
@@ -245,6 +245,8 @@ FCALLSCFUN1 (DOUBLE, gridInqYpole, GRIDINQYPOLE, gridinqypole, INT)
FCALLSCSUB2 (gridDefYpole, GRIDDEFYPOLE, griddefypole, INT, DOUBLE)
FCALLSCFUN1 (DOUBLE, gridInqAngle, GRIDINQANGLE, gridinqangle, INT)
FCALLSCSUB2 (gridDefAngle, GRIDDEFANGLE, griddefangle, INT, DOUBLE)
+FCALLSCFUN1 (DOUBLE, gridInqNpole, GRIDINQNPOLE, gridinqnpole, INT)
+FCALLSCSUB2 (gridDefNpole, GRIDDEFNPOLE, griddefnpole, INT, DOUBLE)
FCALLSCSUB2 (gridDefTrunc, GRIDDEFTRUNC, griddeftrunc, INT, INT)
FCALLSCFUN1 (INT, gridInqTrunc, GRIDINQTRUNC, gridinqtrunc, INT)
--
GitLab