Commit 1688ce38 authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

Added max length of a name CDI_MAX_NAME=256

parent 43dd72a6
......@@ -1080,6 +1080,15 @@ Get the name of a Z-axis.
Get the size of a Z-axis.
\section*{\tt \htmlref{zaxisInqStdname}{zaxisInqStdname}}
\begin{verbatim}
void zaxisInqStdname (intzaxisID, char *stdname);
\end{verbatim}
Get the standard name of a Z-axis.
\section*{\tt \htmlref{zaxisInqType}{zaxisInqType}}
\begin{verbatim}
......
......@@ -1099,6 +1099,15 @@ Get the name of a Z-axis.
Get the size of a Z-axis.
\section*{\tt \htmlref{zaxisInqStdname}{zaxisInqStdname}}
\begin{verbatim}
SUBROUTINE zaxisInqStdname (INTEGER zaxisID, CHARACTER*(*) stdname)
\end{verbatim}
Get the standard name of a Z-axis.
\section*{\tt \htmlref{zaxisInqType}{zaxisInqType}}
\begin{verbatim}
......
......@@ -13,6 +13,8 @@
extern "C" {
#endif
#define CDI_MAX_NAME 256 /* max length of a name */
#define CDI_UNDEFID -1
#define CDI_GLOBAL -1 /* Global var ID for vlist */
......
......@@ -4,9 +4,11 @@
!
! Author:
! -------
! Uwe Schulzweida, MPI-MET, Hamburg, April 2011
! Uwe Schulzweida, MPI-MET, Hamburg, May 2011
!
INTEGER CDI_MAX_NAME
PARAMETER (CDI_MAX_NAME = 256)
INTEGER CDI_UNDEFID
PARAMETER (CDI_UNDEFID = -1)
INTEGER CDI_GLOBAL
......@@ -1615,6 +1617,11 @@
! CHARACTER*(*) longname)
EXTERNAL zaxisInqLongname
! zaxisInqStdname
! (INTEGER zaxisID,
! CHARACTER*(*) stdname)
EXTERNAL zaxisInqStdname
! zaxisInqUnits
! (INTEGER zaxisID,
! CHARACTER*(*) units)
......@@ -1629,6 +1636,10 @@
! (INTEGER zaxisID)
EXTERNAL zaxisInqPrec
INTEGER zaxisInqPositive
! (INTEGER zaxisID)
EXTERNAL zaxisInqPositive
! zaxisDefLtype
! (INTEGER zaxisID,
! INTEGER ltype)
......
......@@ -342,9 +342,11 @@ FCALLSCSUB2 (zaxisDefLongname, ZAXISDEFLONGNAME, zaxisdeflongname, INT, STRING)
FCALLSCSUB2 (zaxisDefUnits, ZAXISDEFUNITS, zaxisdefunits, INT, STRING)
FCALLSCSUB2 (zaxisInqName, ZAXISINQNAME, zaxisinqname, INT, PSTRING)
FCALLSCSUB2 (zaxisInqLongname, ZAXISINQLONGNAME, zaxisinqlongname, INT, PSTRING)
FCALLSCSUB2 (zaxisInqStdname, ZAXISINQSTDNAME, zaxisinqstdname, INT, PSTRING)
FCALLSCSUB2 (zaxisInqUnits, ZAXISINQUNITS, zaxisinqunits, INT, PSTRING)
FCALLSCSUB2 (zaxisDefPrec, ZAXISDEFPREC, zaxisdefprec, INT, INT)
FCALLSCFUN1 (INT, zaxisInqPrec, ZAXISINQPREC, zaxisinqprec, INT)
FCALLSCFUN1 (INT, zaxisInqPositive, ZAXISINQPOSITIVE, zaxisinqpositive, INT)
FCALLSCSUB2 (zaxisDefLtype, ZAXISDEFLTYPE, zaxisdefltype, INT, INT)
FCALLSCFUN1 (INT, zaxisInqLtype, ZAXISINQLTYPE, zaxisinqltype, INT)
FCALLSCSUB3 (zaxisDefVct, ZAXISDEFVCT, zaxisdefvct, INT, INT, PDOUBLE)
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment