NCEPLIBS-bufr
12.0.1
|
Look for a window containing a specified node within the internal jump/link table. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | getwin (NODE, LUN, IWIN, JWIN) |
Given a node index within the internal jump/link table, this subroutine looks within the current subset buffer for a "window" (see below remarks) which contains this node. More... | |
Look for a window containing a specified node within the internal jump/link table.
Definition in file getwin.f.
subroutine getwin | ( | NODE, | |
LUN, | |||
IWIN, | |||
JWIN | |||
) |
Given a node index within the internal jump/link table, this subroutine looks within the current subset buffer for a "window" (see below remarks) which contains this node.
If found, it returns the starting and ending indices of this window within the current subset buffer. For example, if the node is found within the subset but is not part of a delayed replication sequence, then the returned indices define the start and end of the entire subset buffer. Otherwise, the returned indices define the start and end of the next available delayed replication sequence iteration which contains the node. If no further iterations of the sequence can be found, then the starting index is returned with a value of zero.
[in] | NODE | - integer: jump/link table index of mnemonic to look for. |
[in] | LUN | - integer: i/o stream index into internal memory arrays. |
[out] | IWIN | - integer: starting index of the current window iteration which contains node
|
[out] | JWIN | - integer: ending index of the current window iteration which contains node. |
Definition at line 47 of file getwin.f.
References bort(), invwin(), lstjpb(), moda_usrint::nval, and moda_usrint::val.