Commit 8618024f authored by Thomas Jahns's avatar Thomas Jahns 🤸
Browse files

Add function to query current timestep id.

parent 101a4d0d
......@@ -330,6 +330,9 @@ int streamInqCompLevel(int streamID);
/* streamDefTimestep: Define time step */
int streamDefTimestep(int streamID, int tsID);
/* query currently set timestep id */
int streamInqCurTimestepID(int streamID);
/* streamInqTimestep: Get time step */
int streamInqTimestep(int streamID, int tsID);
......
......@@ -577,6 +577,13 @@
! INTEGER tsID)
EXTERNAL streamDefTimestep
!
! query currently set timestep id
!
INTEGER streamInqCurTimestepID
! (INTEGER streamID)
EXTERNAL streamInqCurTimestepID
INTEGER streamInqTimestep
! (INTEGER streamID,
! INTEGER tsID)
......
......@@ -144,6 +144,10 @@ FCALLSCSUB2 (streamDefCompLevel, STREAMDEFCOMPLEVEL, streamdefcomplevel, INT, IN
FCALLSCFUN1 (INT, streamInqCompType, STREAMINQCOMPTYPE, streaminqcomptype, INT)
FCALLSCFUN1 (INT, streamInqCompLevel, STREAMINQCOMPLEVEL, streaminqcomplevel, INT)
FCALLSCFUN2 (INT, streamDefTimestep, STREAMDEFTIMESTEP, streamdeftimestep, INT, INT)
/* query currently set timestep id */
FCALLSCFUN1 (INT, streamInqCurTimestepID, STREAMINQCURTIMESTEPID, streaminqcurtimestepid, INT)
FCALLSCFUN2 (INT, streamInqTimestep, STREAMINQTIMESTEP, streaminqtimestep, INT, INT)
FCALLSCFUN1 (STRING, streamFilename, STREAMFILENAME, streamfilename, INT)
FCALLSCFUN1 (STRING, streamFilesuffix, STREAMFILESUFFIX, streamfilesuffix, INT)
......
......@@ -1383,6 +1383,13 @@ int streamDefTimestep(int streamID, int tsID)
return myStreamDefTimestep_(streamptr, tsID);
}
int streamInqCurTimestepID(int streamID)
{
stream_t *streamptr = stream_to_pointer(streamID);
return streamptr->curTsID;
}
/*
@Function streamInqTimestep
@Title Get time step
......
Markdown is supported
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