Skip to content
GitLab
Commit 0ea23982 authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

cdi.h: added '_vec' to all int and double vector arguments

parent 85db3f46
Hide whitespace changes
Inline Side-by-side
ChangeLog
View file @ 0ea23982
2009-11-13 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* cdi.h: added '_vec' to all int and double vector arguments
2009-11-12 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* set units to "Pa" if changing zaxis to "pressure" (bug fix) [report: Chao Li]
......
doc/tex/c_quick_ref.tex
View file @ 0ea23982
......@@ -34,7 +34,7 @@ Define the precision of a Grid.
\section*{\tt \htmlref{gridDefXbounds}{gridDefXbounds}}
\begin{verbatim}
void gridDefXbounds (intgridID, double *xbounds);
void gridDefXbounds (intgridID, double *xbounds_vec);
\end{verbatim}
Define the bounds of a X-axis.
......@@ -79,7 +79,7 @@ Define the units of a X-axis.
\section*{\tt \htmlref{gridDefXvals}{gridDefXvals}}
\begin{verbatim}
void gridDefXvals (intgridID, double *xvals);
void gridDefXvals (intgridID, double *xvals_vec);
\end{verbatim}
Define the values of a X-axis.
......@@ -88,7 +88,7 @@ Define the values of a X-axis.
\section*{\tt \htmlref{gridDefYbounds}{gridDefYbounds}}
\begin{verbatim}
void gridDefYbounds (intgridID, double *ybounds);
void gridDefYbounds (intgridID, double *ybounds_vec);
\end{verbatim}
Define the bounds of a Y-axis.
......@@ -133,7 +133,7 @@ Define the units of a Y-axis.
\section*{\tt \htmlref{gridDefYvals}{gridDefYvals}}
\begin{verbatim}
void gridDefYvals (intgridID, double *yvals);
void gridDefYvals (intgridID, double *yvals_vec);
\end{verbatim}
Define the values of a Y-axis.
......@@ -196,7 +196,7 @@ Get the type of a Grid.
\section*{\tt \htmlref{gridInqXbounds}{gridInqXbounds}}
\begin{verbatim}
int gridInqXbounds (intgridID, double *xbounds);
int gridInqXbounds (intgridID, double *xbounds_vec);
\end{verbatim}
Get the bounds of a X-axis.
......@@ -259,7 +259,7 @@ Get one value of a X-axis.
\section*{\tt \htmlref{gridInqXvals}{gridInqXvals}}
\begin{verbatim}
int gridInqXvals (intgridID, double *xvals);
int gridInqXvals (intgridID, double *xvals_vec);
\end{verbatim}
Get all values of a X-axis.
......@@ -268,7 +268,7 @@ Get all values of a X-axis.
\section*{\tt \htmlref{gridInqYbounds}{gridInqYbounds}}
\begin{verbatim}
int gridInqYbounds (intgridID, double *ybounds);
int gridInqYbounds (intgridID, double *ybounds_vec);
\end{verbatim}
Get the bounds of a Y-axis.
......@@ -331,7 +331,7 @@ Get one value of a Y-axis.
\section*{\tt \htmlref{gridInqYvals}{gridInqYvals}}
\begin{verbatim}
int gridInqYvals (intgridID, double *yvals);
int gridInqYvals (intgridID, double *yvals_vec);
\end{verbatim}
Get all values of a Y-axis.
......@@ -466,7 +466,7 @@ Create a new dataset.
\section*{\tt \htmlref{streamReadVar}{streamReadVar}}
\begin{verbatim}
void streamReadVar (intstreamID, intvarID, double *data, int *nmiss);
void streamReadVar (intstreamID, intvarID, double *data_vec, int *nmiss);
\end{verbatim}
Read a variable.
......@@ -475,7 +475,7 @@ Read a variable.
\section*{\tt \htmlref{streamReadVarSlice}{streamReadVarSlice}}
\begin{verbatim}
void streamReadVarSlice (intstreamID, intvarID, intlevelID, double *data,
void streamReadVarSlice (intstreamID, intvarID, intlevelID, double *data_vec,
int *nmiss);
\end{verbatim}
......@@ -494,7 +494,7 @@ Synchronize an Open Dataset to Disk.
\section*{\tt \htmlref{streamWriteVar}{streamWriteVar}}
\begin{verbatim}
void streamWriteVar (intstreamID, intvarID, double *data, intnmiss);
void streamWriteVar (intstreamID, intvarID, double *data_vec, intnmiss);
\end{verbatim}
Write a variable.
......@@ -503,7 +503,7 @@ Write a variable.
\section*{\tt \htmlref{streamWriteVarSlice}{streamWriteVarSlice}}
\begin{verbatim}
void streamWriteVarSlice (intstreamID, intvarID, intlevelID, double *data,
void streamWriteVarSlice (intstreamID, intvarID, intlevelID, double *data_vec,
intnmiss);
\end{verbatim}
......@@ -654,6 +654,15 @@ Copy some entries of a variable list.
Create a variable list.
\section*{\tt \htmlref{vlistDefAttInt}{vlistDefAttInt}}
\begin{verbatim}
int vlistDefAttInt (intvlistID, intvarID, char *name, intlen, int *ip_vec);
\end{verbatim}
Define an integer attribute.
\section*{\tt \htmlref{vlistDefTaxis}{vlistDefTaxis}}
\begin{verbatim}
......@@ -717,6 +726,15 @@ Define the missing value of a Variable.
Define the name of a Variable.
\section*{\tt \htmlref{vlistDefVarStdname}{vlistDefVarStdname}}
\begin{verbatim}
void vlistDefVarStdname (intvlistID, intvarID, char *stdname);
\end{verbatim}
Define the standard name of a Variable.
\section*{\tt \htmlref{vlistDefVarUnits}{vlistDefVarUnits}}
\begin{verbatim}
......@@ -744,6 +762,34 @@ Destroy a variable list.
Duplicate a variable list.
\section*{\tt \htmlref{vlistInqAtt}{vlistInqAtt}}
\begin{verbatim}
int vlistInqAtt (intvlistID, intvarID, intattrnum, char *name, int *typep,
int *lenp);
\end{verbatim}
Get information about an attribute.
\section*{\tt \htmlref{vlistInqAttInt}{vlistInqAttInt}}
\begin{verbatim}
int vlistInqAttInt (intvlistID, intvarID, char *name, intmlen, int *ip_vec);
\end{verbatim}
Get the value(s) of an integer attribute.
\section*{\tt \htmlref{vlistInqNatts}{vlistInqNatts}}
\begin{verbatim}
int vlistInqNatts (intvlistID, intvarID, int *nattsp);
\end{verbatim}
Get number of variable attributes assigned to this variable.
\section*{\tt \htmlref{vlistInqTaxis}{vlistInqTaxis}}
\begin{verbatim}
......@@ -798,6 +844,15 @@ Get the missing value of a Variable.
Get the name of a Variable.
\section*{\tt \htmlref{vlistInqVarStdname}{vlistInqVarStdname}}
\begin{verbatim}
void vlistInqVarStdname (intvlistID, intvarID, char *stdname);
\end{verbatim}
Get the standard name of a Variable.
\section*{\tt \htmlref{vlistInqVarUnits}{vlistInqVarUnits}}
\begin{verbatim}
......@@ -864,7 +919,7 @@ Define one level of a Z-axis.
\section*{\tt \htmlref{zaxisDefLevels}{zaxisDefLevels}}
\begin{verbatim}
void zaxisDefLevels (intzaxisID, double *levels);
void zaxisDefLevels (intzaxisID, double *levels_vec);
\end{verbatim}
Define the levels of a Z-axis.
......@@ -927,7 +982,7 @@ Get one level of a Z-axis.
\section*{\tt \htmlref{zaxisInqLevels}{zaxisInqLevels}}
\begin{verbatim}
void zaxisInqLevels (intzaxisID, double *levels);
void zaxisInqLevels (intzaxisID, double *levels_vec);
\end{verbatim}
Get all levels of a Z-axis.
......
doc/tex/f_quick_ref.tex
View file @ 0ea23982
......@@ -34,7 +34,7 @@ Define the precision of a Grid.
\section*{\tt \htmlref{gridDefXbounds}{gridDefXbounds}}
\begin{verbatim}
SUBROUTINE gridDefXbounds (INTEGER gridID, DOUBLEPRECISION xbounds)
SUBROUTINE gridDefXbounds (INTEGER gridID, DOUBLEPRECISION xbounds_vec)
\end{verbatim}
Define the bounds of a X-axis.
......@@ -79,7 +79,7 @@ Define the units of a X-axis.
\section*{\tt \htmlref{gridDefXvals}{gridDefXvals}}
\begin{verbatim}
SUBROUTINE gridDefXvals (INTEGER gridID, DOUBLEPRECISION xvals)
SUBROUTINE gridDefXvals (INTEGER gridID, DOUBLEPRECISION xvals_vec)
\end{verbatim}
Define the values of a X-axis.
......@@ -88,7 +88,7 @@ Define the values of a X-axis.
\section*{\tt \htmlref{gridDefYbounds}{gridDefYbounds}}
\begin{verbatim}
SUBROUTINE gridDefYbounds (INTEGER gridID, DOUBLEPRECISION ybounds)
SUBROUTINE gridDefYbounds (INTEGER gridID, DOUBLEPRECISION ybounds_vec)
\end{verbatim}
Define the bounds of a Y-axis.
......@@ -133,7 +133,7 @@ Define the units of a Y-axis.
\section*{\tt \htmlref{gridDefYvals}{gridDefYvals}}
\begin{verbatim}
SUBROUTINE gridDefYvals (INTEGER gridID, DOUBLEPRECISION yvals)
SUBROUTINE gridDefYvals (INTEGER gridID, DOUBLEPRECISION yvals_vec)
\end{verbatim}
Define the values of a Y-axis.
......@@ -196,7 +196,7 @@ Get the type of a Grid.
\section*{\tt \htmlref{gridInqXbounds}{gridInqXbounds}}
\begin{verbatim}
INTEGER FUNCTION gridInqXbounds (INTEGER gridID, DOUBLEPRECISION xbounds)
INTEGER FUNCTION gridInqXbounds (INTEGER gridID, DOUBLEPRECISION xbounds_vec)
\end{verbatim}
Get the bounds of a X-axis.
......@@ -259,7 +259,7 @@ Get one value of a X-axis.
\section*{\tt \htmlref{gridInqXvals}{gridInqXvals}}
\begin{verbatim}
INTEGER FUNCTION gridInqXvals (INTEGER gridID, DOUBLEPRECISION xvals)
INTEGER FUNCTION gridInqXvals (INTEGER gridID, DOUBLEPRECISION xvals_vec)
\end{verbatim}
Get all values of a X-axis.
......@@ -268,7 +268,7 @@ Get all values of a X-axis.
\section*{\tt \htmlref{gridInqYbounds}{gridInqYbounds}}
\begin{verbatim}
INTEGER FUNCTION gridInqYbounds (INTEGER gridID, DOUBLEPRECISION ybounds)
INTEGER FUNCTION gridInqYbounds (INTEGER gridID, DOUBLEPRECISION ybounds_vec)
\end{verbatim}
Get the bounds of a Y-axis.
......@@ -331,7 +331,7 @@ Get one value of a Y-axis.
\section*{\tt \htmlref{gridInqYvals}{gridInqYvals}}
\begin{verbatim}
INTEGER FUNCTION gridInqYvals (INTEGER gridID, DOUBLEPRECISION yvals)
INTEGER FUNCTION gridInqYvals (INTEGER gridID, DOUBLEPRECISION yvals_vec)
\end{verbatim}
Get all values of a Y-axis.
......@@ -466,8 +466,8 @@ Create a new dataset.
\section*{\tt \htmlref{streamReadVar}{streamReadVar}}
\begin{verbatim}
SUBROUTINE streamReadVar (INTEGER streamID, INTEGER varID, DOUBLEPRECISION data,
INTEGER nmiss)
SUBROUTINE streamReadVar (INTEGER streamID, INTEGER varID,
DOUBLEPRECISION data_vec, INTEGER nmiss)
\end{verbatim}
Read a variable.
......@@ -477,7 +477,7 @@ Read a variable.
\begin{verbatim}
SUBROUTINE streamReadVarSlice (INTEGER streamID, INTEGER varID, INTEGER levelID,
DOUBLEPRECISION data, INTEGER nmiss)
DOUBLEPRECISION data_vec, INTEGER nmiss)
\end{verbatim}
Read a horizontal slice of a variable.
......@@ -495,8 +495,8 @@ Synchronize an Open Dataset to Disk.
\section*{\tt \htmlref{streamWriteVar}{streamWriteVar}}
\begin{verbatim}
SUBROUTINE streamWriteVar (INTEGER streamID, INTEGER varID, DOUBLEPRECISION data,
INTEGER nmiss)
SUBROUTINE streamWriteVar (INTEGER streamID, INTEGER varID,
DOUBLEPRECISION data_vec, INTEGER nmiss)
\end{verbatim}
Write a variable.
......@@ -506,7 +506,7 @@ Write a variable.
\begin{verbatim}
SUBROUTINE streamWriteVarSlice (INTEGER streamID, INTEGER varID, INTEGER levelID,
DOUBLEPRECISION data, INTEGER nmiss)
DOUBLEPRECISION data_vec, INTEGER nmiss)
\end{verbatim}
Write a horizontal slice of a variable.
......@@ -656,6 +656,16 @@ Copy some entries of a variable list.
Create a variable list.
\section*{\tt \htmlref{vlistDefAttInt}{vlistDefAttInt}}
\begin{verbatim}
INTEGER FUNCTION vlistDefAttInt (INTEGER vlistID, INTEGER varID,
CHARACTER*(*) name, INTEGER len, INTEGER ip_vec)
\end{verbatim}
Define an integer attribute.
\section*{\tt \htmlref{vlistDefTaxis}{vlistDefTaxis}}
\begin{verbatim}
......@@ -722,6 +732,16 @@ Define the missing value of a Variable.
Define the name of a Variable.
\section*{\tt \htmlref{vlistDefVarStdname}{vlistDefVarStdname}}
\begin{verbatim}
SUBROUTINE vlistDefVarStdname (INTEGER vlistID, INTEGER varID,
CHARACTER*(*) stdname)
\end{verbatim}
Define the standard name of a Variable.
\section*{\tt \htmlref{vlistDefVarUnits}{vlistDefVarUnits}}
\begin{verbatim}
......@@ -749,6 +769,36 @@ Destroy a variable list.
Duplicate a variable list.
\section*{\tt \htmlref{vlistInqAtt}{vlistInqAtt}}
\begin{verbatim}
INTEGER FUNCTION vlistInqAtt (INTEGER vlistID, INTEGER varID, INTEGER attrnum,
CHARACTER*(*) name, INTEGER typep, INTEGER lenp)
\end{verbatim}
Get information about an attribute.
\section*{\tt \htmlref{vlistInqAttInt}{vlistInqAttInt}}
\begin{verbatim}
INTEGER FUNCTION vlistInqAttInt (INTEGER vlistID, INTEGER varID,
CHARACTER*(*) name, INTEGER mlen,
INTEGER ip_vec)
\end{verbatim}
Get the value(s) of an integer attribute.
\section*{\tt \htmlref{vlistInqNatts}{vlistInqNatts}}
\begin{verbatim}
INTEGER FUNCTION vlistInqNatts (INTEGER vlistID, INTEGER varID, INTEGER nattsp)
\end{verbatim}
Get number of variable attributes assigned to this variable.
\section*{\tt \htmlref{vlistInqTaxis}{vlistInqTaxis}}
\begin{verbatim}
......@@ -804,6 +854,16 @@ Get the missing value of a Variable.
Get the name of a Variable.
\section*{\tt \htmlref{vlistInqVarStdname}{vlistInqVarStdname}}
\begin{verbatim}
SUBROUTINE vlistInqVarStdname (INTEGER vlistID, INTEGER varID,
CHARACTER*(*) stdname)
\end{verbatim}
Get the standard name of a Variable.
\section*{\tt \htmlref{vlistInqVarUnits}{vlistInqVarUnits}}
\begin{verbatim}
......@@ -871,7 +931,7 @@ Define one level of a Z-axis.
\section*{\tt \htmlref{zaxisDefLevels}{zaxisDefLevels}}
\begin{verbatim}
SUBROUTINE zaxisDefLevels (INTEGER zaxisID, DOUBLEPRECISION levels)
SUBROUTINE zaxisDefLevels (INTEGER zaxisID, DOUBLEPRECISION levels_vec)
\end{verbatim}
Define the levels of a Z-axis.
......@@ -934,7 +994,7 @@ Get one level of a Z-axis.
\section*{\tt \htmlref{zaxisInqLevels}{zaxisInqLevels}}
\begin{verbatim}
SUBROUTINE zaxisInqLevels (INTEGER zaxisID, DOUBLEPRECISION levels)
SUBROUTINE zaxisInqLevels (INTEGER zaxisID, DOUBLEPRECISION levels_vec)
\end{verbatim}
Get all levels of a Z-axis.
......
src/cdi.h
View file @ 0ea23982
......@@ -230,24 +230,24 @@ off_t streamNvals(int streamID);
/* STREAM var I/O routines */
/* streamReadVar: Read a variable */
void streamReadVar(int streamID, int varID, double *data, int *nmiss);
void streamReadVar(int streamID, int varID, double *data_vec, int *nmiss);
/* streamWriteVar: Write a variable */
void streamWriteVar(int streamID, int varID, const double *data, int nmiss);
void streamWriteVar(int streamID, int varID, const double *data_vec, int nmiss);
/* streamReadVarSlice: Read a horizontal slice of a variable */
void streamReadVarSlice(int streamID, int varID, int levelID, double *data, int *nmiss);
void streamReadVarSlice(int streamID, int varID, int levelID, double *data_vec, int *nmiss);
/* streamWriteVarSlice: Write a horizontal slice of a variable */
void streamWriteVarSlice(int streamID, int varID, int levelID, const double *data, int nmiss);
void streamWriteVarSlice(int streamID, int varID, int levelID, const double *data_vec, int nmiss);
/* STREAM record I/O routines */
void streamInqRecord(int streamID, int *varID, int *levelID);
void streamDefRecord(int streamID, int varID, int levelID);
void streamReadRecord(int streamID, double *data, int *nmiss);
void streamWriteRecord(int streamID, const double *data, int nmiss);
void streamReadRecord(int streamID, double *data_vec, int *nmiss);
void streamWriteRecord(int streamID, const double *data_vec, int nmiss);
void streamCopyRecord(int streamIDdest, int streamIDsrc);
void streamInqGinfo(int streamID, int *intnum, float *fltnum);
......@@ -412,16 +412,16 @@ int vlistInqAtt(int vlistID, int varID, int attrnum, char *name, int *typep,
int vlistDelAtt(int vlistID, int varID, const char *name);
/* vlistDefAttInt: Define an integer attribute */
int vlistDefAttInt(int vlistID, int varID, const char *name, int len, const int *ip);
int vlistDefAttInt(int vlistID, int varID, const char *name, int len, const int *ip_vec);
/* vlistDefAttInt: Define a floating point attribute */
int vlistDefAttFlt(int vlistID, int varID, const char *name, int len, const double *dp);
int vlistDefAttFlt(int vlistID, int varID, const char *name, int len, const double *dp_vec);
/* vlistDefAttInt: Define a text attribute */
int vlistDefAttTxt(int vlistID, int varID, const char *name, int len, const char *tp);
/* vlistInqAttInt: Get the value(s) of an integer attribute */
int vlistInqAttInt(int vlistID, int varID, const char *name, int mlen, int *ip);
int vlistInqAttInt(int vlistID, int varID, const char *name, int mlen, int *ip_vec);
/* vlistInqAttInt: Get the value(s) of a floating point attribute */
int vlistInqAttFlt(int vlistID, int varID, const char *name, int mlen, double *dp);
int vlistInqAttFlt(int vlistID, int varID, const char *name, int mlen, double *dp_vec);
/* vlistInqAttInt: Get the value(s) of a text attribute */
int vlistInqAttTxt(int vlistID, int varID, const char *name, int mlen, char *tp);
......@@ -433,8 +433,8 @@ char *gridNamePtr(int gridtype);
void gridCompress(int gridID);
void gridDefMask(int gridID, const int *mask);
int gridInqMask(int gridID, int *mask);
void gridDefMask(int gridID, const int *mask_vec);
int gridInqMask(int gridID, int *mask_vec);
void gridPrint(int gridID, int opt);
int gridSize(void);
......@@ -467,16 +467,16 @@ void gridDefYsize(int gridID, int ysize);
int gridInqYsize(int gridID);
/* gridDefXvals: Define the values of a X-axis */
void gridDefXvals(int gridID, const double *xvals);
void gridDefXvals(int gridID, const double *xvals_vec);
/* gridInqXvals: Get all values of a X-axis */
int gridInqXvals(int gridID, double *xvals);
int gridInqXvals(int gridID, double *xvals_vec);
/* gridDefYvals: Define the values of a Y-axis */
void gridDefYvals(int gridID, const double *yvals);
void gridDefYvals(int gridID, const double *yvals_vec);
/* gridInqYvals: Get all values of a Y-axis */
int gridInqYvals(int gridID, double *yvals);
int gridInqYvals(int gridID, double *yvals_vec);
/* gridDefXname: Define the name of a X-axis */
void gridDefXname(int gridID, const char *xname);
......@@ -568,8 +568,8 @@ void gridDefLaea(int gridID, double earth_radius, double lon_0, double lat_0);
void gridInqLaea(int gridID, double *earth_radius, double *lon_0, double *lat_0);
void gridDefArea(int gridID, const double *area);
void gridInqArea(int gridID, double *area);
void gridDefArea(int gridID, const double *area_vec);
void gridInqArea(int gridID, double *area_vec);
int gridHasArea(int gridID);
/* gridDefNvertex: Define the number of vertex of a Gridbox */
......@@ -579,19 +579,19 @@ void gridDefNvertex(int gridID, int nvertex);
int gridInqNvertex(int gridID);
/* gridDefXbounds: Define the bounds of a X-axis */
void gridDefXbounds(int gridID, const double *xbounds);
void gridDefXbounds(int gridID, const double *xbounds_vec);
/* gridInqXbounds: Get the bounds of a X-axis */
int gridInqXbounds(int gridID, double *xbounds);
int gridInqXbounds(int gridID, double *xbounds_vec);
/* gridDefYbounds: Define the bounds of a Y-axis */
void gridDefYbounds(int gridID, const double *ybounds);
void gridDefYbounds(int gridID, const double *ybounds_vec);
/* gridInqYbounds: Get the bounds of a Y-axis */
int gridInqYbounds(int gridID, double *ybounds);
int gridInqYbounds(int gridID, double *ybounds_vec);
void gridDefRowlon(int gridID, int nrowlon, const int *rowlon);
void gridInqRowlon(int gridID, int *rowlon);
void gridDefRowlon(int gridID, int nrowlon, const int *rowlon_vec);
void gridInqRowlon(int gridID, int *rowlon_vec);
void gridChangeType(int gridID, int gridtype);
/* ZAXIS routines */
......@@ -619,10 +619,10 @@ void zaxisPrint(int zaxisID);
int zaxisSize(void);
/* zaxisDefLevels: Define the levels of a Z-axis */
void zaxisDefLevels(int zaxisID, const double *levels);
void zaxisDefLevels(int zaxisID, const double *levels_vec);
/* zaxisInqLevels: Get all levels of a Z-axis */
void zaxisInqLevels(int zaxisID, double *levels);
void zaxisInqLevels(int zaxisID, double *levels_vec);
/* zaxisDefLevel: Define one level of a Z-axis */
void zaxisDefLevel(int zaxisID, int levelID, double levels);
......@@ -655,17 +655,17 @@ void zaxisDefLtype(int zaxisID, int ltype);
int zaxisInqLtype(int zaxisID);
const double *zaxisInqLevelsPtr(int zaxisID);
void zaxisDefVct(int zaxisID, int size, const double *vct);
void zaxisDefVct(int zaxisID, int size, const double *vct_vec);
int zaxisInqVctSize(int zaxisID);
const double *zaxisInqVctPtr(int zaxisID);
int zaxisInqLbounds(int zaxisID, double *lbounds);
int zaxisInqUbounds(int zaxisID, double *ubounds);
int zaxisInqWeights(int zaxisID, double *weights);
int zaxisInqLbounds(int zaxisID, double *lbounds_vec);
int zaxisInqUbounds(int zaxisID, double *ubounds_vec);
int zaxisInqWeights(int zaxisID, double *weights_vec);
double zaxisInqLbound(int zaxisID, int index);
double zaxisInqUbound(int zaxisID, int index);
void zaxisDefLbounds(int zaxisID, const double *lbounds);
void zaxisDefUbounds(int zaxisID, const double *ubounds);
void zaxisDefWeights(int zaxisID, const double *weights);
void zaxisDefLbounds(int zaxisID, const double *lbounds_vec);
void zaxisDefUbounds(int zaxisID, const double *ubounds_vec);
void zaxisDefWeights(int zaxisID, const double *weights_vec);
void zaxisChangeType(int zaxisID, int zaxistype);
/* TAXIS routines */
......
src/cdi.inc
View file @ 0ea23982
......@@ -4,7 +4,7 @@
!
! Author:
! -------
! Uwe Schulzweida, MPI-MET, Hamburg, October 2009
! Uwe Schulzweida, MPI-MET, Hamburg, November 2009
!
INTEGER CDI_UNDEFID
......@@ -67,6 +67,8 @@
PARAMETER (COMPRESS_BZIP2 = 3)
INTEGER COMPRESS_ZIP
PARAMETER (COMPRESS_ZIP = 4)
INTEGER COMPRESS_JPEG
PARAMETER (COMPRESS_JPEG = 5)
!
! external data types
!
......@@ -388,14 +390,14 @@
! streamReadVar
! (INTEGER streamID,
! INTEGER varID,
! DOUBLEPRECISION data,
! DOUBLEPRECISION data_vec,
! INTEGER nmiss)
EXTERNAL streamReadVar
! streamWriteVar
! (INTEGER streamID,
! INTEGER varID,
! DOUBLEPRECISION data,
! DOUBLEPRECISION data_vec,
! INTEGER nmiss)
EXTERNAL streamWriteVar
......@@ -403,7 +405,7 @@
! (INTEGER streamID,
! INTEGER varID,
! INTEGER levelID,
! DOUBLEPRECISION data,
! DOUBLEPRECISION data_vec,
! INTEGER nmiss)
EXTERNAL streamReadVarSlice
......@@ -411,7 +413,7 @@
! (INTEGER streamID,
! INTEGER varID,
! INTEGER levelID,
! DOUBLEPRECISION data,
! DOUBLEPRECISION data_vec,
! INTEGER nmiss)
EXTERNAL streamWriteVarSlice
......@@ -432,13 +434,13 @@
! streamReadRecord
! (INTEGER streamID,
! DOUBLEPRECISION data,
! DOUBLEPRECISION data_vec,
! INTEGER nmiss)
EXTERNAL streamReadRecord
! streamWriteRecord
! (INTEGER streamID,
! DOUBLEPRECISION data,
! DOUBLEPRECISION data_vec,
! INTEGER nmiss)
EXTERNAL streamWriteRecord
......@@ -732,29 +734,29 @@
! CHARACTER*(*) name)
EXTERNAL vlistInqVarName
! vlistDefVarLongname
! vlistDefVarStdname