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
7ab7bb49
Commit
7ab7bb49
authored
Jun 06, 2012
by
Uwe Schulzweida
Browse files
Fortran interface update
parent
5c7f1ce7
Changes
4
Hide whitespace changes
Inline
Side-by-side
doc/tex/c_quick_ref.tex
View file @
7ab7bb49
...
...
@@ -713,7 +713,7 @@ Define the time axis of a variable list.
\section*
{
\tt
\htmlref
{
vlistDefVar
}{
vlistDefVar
}}
\begin{verbatim}
int vlistDefVar (intvlistID, intgridID, intzaxisID, intt
imeID
);
int vlistDefVar (intvlistID, intgridID, intzaxisID, intt
steptype
);
\end{verbatim}
Create a new Variable.
...
...
doc/tex/f_quick_ref.tex
View file @
7ab7bb49
...
...
@@ -720,7 +720,7 @@ Define the time axis of a variable list.
\begin{verbatim}
INTEGER FUNCTION vlistDefVar (INTEGER vlistID, INTEGER gridID, INTEGER zaxisID,
INTEGER t
imeID
)
INTEGER t
steptype
)
\end{verbatim}
Create a new Variable.
...
...
src/cdi.inc
View file @
7ab7bb49
!
This
file
was
automatically
generated
,
don
'
t
edit
!
!
!
Fortran
interface
for
CDI
library
version
1.5.
5
!
Fortran
interface
for
CDI
library
version
1.5.
6
rc1
!
!
Author
:
!
-------
...
...
@@ -257,9 +257,9 @@
!
TIME
types
!
INTEGER
TIME_CONSTANT
PARAMETER
(
TIME_CONSTANT
=
1
)
PARAMETER
(
TIME_CONSTANT
=
0
)
INTEGER
TIME_VARIABLE
PARAMETER
(
TIME_VARIABLE
=
2
)
PARAMETER
(
TIME_VARIABLE
=
1
)
!
!
TSTEP
types
!
...
...
@@ -748,7 +748,7 @@
!
(
INTEGER
vlistID
,
!
INTEGER
gridID
,
!
INTEGER
zaxisID
,
!
INTEGER
t
imeID
)
!
INTEGER
t
steptype
)
EXTERNAL
vlistDefVar
!
vlistChangeVarGrid
...
...
@@ -768,7 +768,7 @@
!
INTEGER
varID
,
!
INTEGER
gridID
,
!
INTEGER
zaxisID
,
!
INTEGER
t
imeID
)
!
INTEGER
t
steptype
)
EXTERNAL
vlistInqVar
INTEGER
vlistInqVarGrid
...
...
@@ -786,6 +786,17 @@
!
INTEGER
varID
)
EXTERNAL
vlistInqVarTime
INTEGER
vlistInqVarTsteptype
!
(
INTEGER
vlistID
,
!
INTEGER
varID
)
EXTERNAL
vlistInqVarTsteptype
!
vlistDefVarTsteptype
!
(
INTEGER
vlistID
,
!
INTEGER
varID
,
!
INTEGER
tsteptype
)
EXTERNAL
vlistDefVarTsteptype
!
vlistDefVarCompType
!
(
INTEGER
vlistID
,
!
INTEGER
varID
,
...
...
@@ -971,17 +982,6 @@
!
INTEGER
varID
)
EXTERNAL
vlistInqVarAddoffset
!
vlistDefVarTsteptype
!
(
INTEGER
vlistID
,
!
INTEGER
varID
,
!
INTEGER
tsteptype
)
EXTERNAL
vlistDefVarTsteptype
INTEGER
vlistInqVarTsteptype
!
(
INTEGER
vlistID
,
!
INTEGER
varID
)
EXTERNAL
vlistInqVarTsteptype
!
vlistDefVarTimave
!
(
INTEGER
vlistID
,
!
INTEGER
varID
,
...
...
src/cdiFortran.c
View file @
7ab7bb49
...
...
@@ -163,6 +163,8 @@ FCALLSCSUB5 (vlistInqVar, VLISTINQVAR, vlistinqvar, INT, INT, PINT, PINT, PINT)
FCALLSCFUN2
(
INT
,
vlistInqVarGrid
,
VLISTINQVARGRID
,
vlistinqvargrid
,
INT
,
INT
)
FCALLSCFUN2
(
INT
,
vlistInqVarZaxis
,
VLISTINQVARZAXIS
,
vlistinqvarzaxis
,
INT
,
INT
)
FCALLSCFUN2
(
INT
,
vlistInqVarTime
,
VLISTINQVARTIME
,
vlistinqvartime
,
INT
,
INT
)
FCALLSCFUN2
(
INT
,
vlistInqVarTsteptype
,
VLISTINQVARTSTEPTYPE
,
vlistinqvartsteptype
,
INT
,
INT
)
FCALLSCSUB3
(
vlistDefVarTsteptype
,
VLISTDEFVARTSTEPTYPE
,
vlistdefvartsteptype
,
INT
,
INT
,
INT
)
FCALLSCSUB3
(
vlistDefVarCompType
,
VLISTDEFVARCOMPTYPE
,
vlistdefvarcomptype
,
INT
,
INT
,
INT
)
FCALLSCFUN2
(
INT
,
vlistInqVarCompType
,
VLISTINQVARCOMPTYPE
,
vlistinqvarcomptype
,
INT
,
INT
)
FCALLSCSUB3
(
vlistDefVarCompLevel
,
VLISTDEFVARCOMPLEVEL
,
vlistdefvarcomplevel
,
INT
,
INT
,
INT
)
...
...
@@ -196,8 +198,6 @@ FCALLSCSUB3 (vlistDefVarScalefactor, VLISTDEFVARSCALEFACTOR, vlistdefvarscalefac
FCALLSCFUN2
(
DOUBLE
,
vlistInqVarScalefactor
,
VLISTINQVARSCALEFACTOR
,
vlistinqvarscalefactor
,
INT
,
INT
)
FCALLSCSUB3
(
vlistDefVarAddoffset
,
VLISTDEFVARADDOFFSET
,
vlistdefvaraddoffset
,
INT
,
INT
,
DOUBLE
)
FCALLSCFUN2
(
DOUBLE
,
vlistInqVarAddoffset
,
VLISTINQVARADDOFFSET
,
vlistinqvaraddoffset
,
INT
,
INT
)
FCALLSCSUB3
(
vlistDefVarTsteptype
,
VLISTDEFVARTSTEPTYPE
,
vlistdefvartsteptype
,
INT
,
INT
,
INT
)
FCALLSCFUN2
(
INT
,
vlistInqVarTsteptype
,
VLISTINQVARTSTEPTYPE
,
vlistinqvartsteptype
,
INT
,
INT
)
FCALLSCSUB3
(
vlistDefVarTimave
,
VLISTDEFVARTIMAVE
,
vlistdefvartimave
,
INT
,
INT
,
INT
)
FCALLSCFUN2
(
INT
,
vlistInqVarTimave
,
VLISTINQVARTIMAVE
,
vlistinqvartimave
,
INT
,
INT
)
FCALLSCSUB3
(
vlistDefVarTimaccu
,
VLISTDEFVARTIMACCU
,
vlistdefvartimaccu
,
INT
,
INT
,
INT
)
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment