Fortran interface update.

src/cdi.inc

@@ -1623,6 +1623,10 @@
       PARAMETER (CDI_KEY_UNITS          = 944)
       INTEGER    CDI_KEY_PSNAME        
       PARAMETER (CDI_KEY_PSNAME         = 950)
+      INTEGER    CDI_KEY_P0NAME        
+      PARAMETER (CDI_KEY_P0NAME         = 951)
+      INTEGER    CDI_KEY_P0VALUE       
+      PARAMETER (CDI_KEY_P0VALUE        = 952)
       INTEGER         cdiGridDefKeyStr
 !                                    (INTEGER         gridID,
 !                                     INTEGER         key,
@@ -1637,6 +1641,18 @@
 !                                     CHARACTER*(*)   mesg)
       EXTERNAL        cdiGridInqKeyStr
 
+      INTEGER         cdiZaxisDefKeyFlt
+!                                    (INTEGER         zaxisID,
+!                                     INTEGER         key,
+!                                     DOUBLEPRECISION value)
+      EXTERNAL        cdiZaxisDefKeyFlt
+
+      INTEGER         cdiZaxisInqKeyFlt
+!                                    (INTEGER         zaxisID,
+!                                     INTEGER         key,
+!                                     DOUBLEPRECISION value)
+      EXTERNAL        cdiZaxisInqKeyFlt
+
 !                     gridDefXname
 !                                    (INTEGER         gridID,
 !                                     CHARACTER*(*)   xname)

src/cdiFortran.c

@@ -336,6 +336,8 @@ FCALLSCFUN2 (INT, gridInqYvals, GRIDINQYVALS, gridinqyvals, INT, DOUBLEV)
 
 FCALLSCFUN4 (INT, cdiGridDefKeyStr, CDIGRIDDEFKEYSTR, cdigriddefkeystr, INT, INT, INT, STRING)
 FCALLSCFUN4 (INT, cdiGridInqKeyStr, CDIGRIDINQKEYSTR, cdigridinqkeystr, INT, INT, INT, PSTRING)
+FCALLSCFUN3 (INT, cdiZaxisDefKeyFlt, CDIZAXISDEFKEYFLT, cdizaxisdefkeyflt, INT, INT, DOUBLE)
+FCALLSCFUN3 (INT, cdiZaxisInqKeyFlt, CDIZAXISINQKEYFLT, cdizaxisinqkeyflt, INT, INT, PDOUBLE)
 FCALLSCSUB2 (gridDefXname, GRIDDEFXNAME, griddefxname, INT, STRING)
 FCALLSCSUB2 (gridInqXname, GRIDINQXNAME, gridinqxname, INT, PSTRING)
 FCALLSCSUB2 (gridDefXlongname, GRIDDEFXLONGNAME, griddefxlongname, INT, STRING)