Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
libcdi
Commits
0ea23982
Commit
0ea23982
authored
Nov 13, 2009
by
Uwe Schulzweida
Browse files
cdi.h: added '_vec' to all int and double vector arguments
parent
85db3f46
Changes
6
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
,
Octo
ber
2009
!
Uwe
Schulzweida
,
MPI
-
MET
,
Hamburg
,
Novem
ber
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
!
vlistDefVar
Long
name
!
vlistDefVar
Std
name