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
5c55626f
Commit
5c55626f
authored
Jan 15, 2013
by
Thomas Jahns
🤸
Browse files
Apply changes of make_fint to documentation.
parent
8c500581
Changes
3
Expand all
Hide whitespace changes
Inline
Side-by-side
doc/tex/c_quick_ref.tex
View file @
5c55626f
This diff is collapsed.
Click to expand it.
src/cdi.inc
View file @
5c55626f
!
This
file
was
automatically
generated
,
don
'
t
edit
!
!
!
Fortran
interface
for
CDI
library
version
1.5.6.1
!
!
Author
:
!
-------
!
Uwe
Schulzweida
,
MPI
-
MET
,
Hamburg
,
J
ul
y
201
2
!
Uwe
Schulzweida
,
MPI
-
MET
,
Hamburg
,
J
anuar
y
201
3
!
INTEGER
CDI_MAX_NAME
...
...
@@ -335,6 +336,9 @@
PARAMETER
(
CALENDAR_366DAYS
=
4
)
INTEGER
CALENDAR_NONE
PARAMETER
(
CALENDAR_NONE
=
5
)
!
!
parallel
IO
IOMode
!
INTEGER
PIO_NONE
PARAMETER
(
PIO_NONE
=
0
)
INTEGER
PIO_MPI
...
...
@@ -345,6 +349,9 @@
PARAMETER
(
PIO_ASYNCH
=
3
)
INTEGER
PIO_FPGUARD
PARAMETER
(
PIO_FPGUARD
=
4
)
!
!
parallel
IO
routines
!
!
pioEndDef
EXTERNAL
pioEndDef
...
...
@@ -382,6 +389,9 @@
!
INTEGER
)
EXTERNAL
pioWriteTimestep
!
!
CDI
control
routines
!
CHARACTER
*
80
cdiStringError
!
(
INTEGER
cdiErrno
)
EXTERNAL
cdiStringError
...
...
@@ -433,6 +443,12 @@
!
INTEGER
pdis
)
EXTERNAL
cdiEncodeParam
!
!
date
format
:
YYYYMMDD
!
!
!
time
format
:
hhmmss
!
!
cdiDecodeDate
!
(
INTEGER
date
,
!
INTEGER
year
,
...
...
@@ -601,6 +617,14 @@
!
INTEGER
nmiss
)
EXTERNAL
streamWriteVarSliceF
!
streamWriteVarChunk
!
(
INTEGER
streamID
,
!
INTEGER
varID
,
!
INTEGER
rect
,
!
DOUBLEPRECISION
data_vec
,
!
INTEGER
nmiss
)
EXTERNAL
streamWriteVarChunk
!
!
STREAM
record
I
/
O
routines
!
...
...
src/cdiFortran.c
View file @
5c55626f
...
...
@@ -53,6 +53,12 @@
/* CALENDAR types */
/* parallel IO IOMode */
/* parallel IO routines */
FCALLSCSUB0
(
pioEndDef
,
PIOENDDEF
,
pioenddef
)
FCALLSCSUB0
(
pioEndTimestepping
,
PIOENDTIMESTEPPING
,
pioendtimestepping
)
FCALLSCSUB0
(
pioFinalize
,
PIOFINALIZE
,
piofinalize
)
...
...
@@ -61,6 +67,9 @@ FCALLSCFUN2 (INT, pioInqVarDecoChunk, PIOINQVARDECOCHUNK, pioinqvardecochunk, IN
FCALLSCFUN2
(
INT
,
pioInqVarDecoOff
,
PIOINQVARDECOOFF
,
pioinqvardecooff
,
INT
,
INT
)
FCALLSCSUB1
(
pioNamespaceSetActive
,
PIONAMESPACESETACTIVE
,
pionamespacesetactive
,
INT
)
FCALLSCSUB3
(
pioWriteTimestep
,
PIOWRITETIMESTEP
,
piowritetimestep
,
INT
,
INT
,
INT
)
/* CDI control routines */
FCALLSCFUN1
(
STRING
,
cdiStringError
,
CDISTRINGERROR
,
cdistringerror
,
INT
)
FCALLSCSUB1
(
cdiDebug
,
CDIDEBUG
,
cdidebug
,
INT
)
FCALLSCFUN0
(
STRING
,
cdiLibraryVersion
,
CDILIBRARYVERSION
,
cdilibraryversion
)
...
...
@@ -77,6 +86,12 @@ FCALLSCSUB2 (cdiDefGlobal, CDIDEFGLOBAL, cdidefglobal, STRING, INT)
FCALLSCSUB3
(
cdiParamToString
,
CDIPARAMTOSTRING
,
cdiparamtostring
,
INT
,
PSTRING
,
INT
)
FCALLSCSUB4
(
cdiDecodeParam
,
CDIDECODEPARAM
,
cdidecodeparam
,
INT
,
PINT
,
PINT
,
PINT
)
FCALLSCFUN3
(
INT
,
cdiEncodeParam
,
CDIENCODEPARAM
,
cdiencodeparam
,
INT
,
INT
,
INT
)
/* date format: YYYYMMDD */
/* time format: hhmmss */
FCALLSCSUB4
(
cdiDecodeDate
,
CDIDECODEDATE
,
cdidecodedate
,
INT
,
PINT
,
PINT
,
PINT
)
FCALLSCFUN3
(
INT
,
cdiEncodeDate
,
CDIENCODEDATE
,
cdiencodedate
,
INT
,
INT
,
INT
)
FCALLSCSUB4
(
cdiDecodeTime
,
CDIDECODETIME
,
cdidecodetime
,
INT
,
PINT
,
PINT
,
PINT
)
...
...
@@ -114,6 +129,7 @@ FCALLSCSUB4 (streamWriteVarF, STREAMWRITEVARF, streamwritevarf, INT, INT, PFLOAT
FCALLSCSUB5
(
streamReadVarSlice
,
STREAMREADVARSLICE
,
streamreadvarslice
,
INT
,
INT
,
INT
,
PDOUBLE
,
PINT
)
FCALLSCSUB5
(
streamWriteVarSlice
,
STREAMWRITEVARSLICE
,
streamwritevarslice
,
INT
,
INT
,
INT
,
PDOUBLE
,
INT
)
FCALLSCSUB5
(
streamWriteVarSliceF
,
STREAMWRITEVARSLICEF
,
streamwritevarslicef
,
INT
,
INT
,
INT
,
PFLOAT
,
INT
)
FCALLSCSUB5
(
streamWriteVarChunk
,
STREAMWRITEVARCHUNK
,
streamwritevarchunk
,
INT
,
INT
,
INTVV
,
PDOUBLE
,
INT
)
/* STREAM record I/O routines */
...
...
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