NCEPLIBS-bufr
12.0.1
|
Computes the ending index of the window. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | newwin (LUN, IWIN, JWIN) |
Given an index within the internal jump/link table which points to the start of an "rpc" window (which is the iteration of an 8-bit or 16-bit delayed replication sequence), this subroutine computes the ending index of the window. More... | |
subroutine newwin | ( | LUN, | |
IWIN, | |||
JWIN | |||
) |
Given an index within the internal jump/link table which points to the start of an "rpc" window (which is the iteration of an 8-bit or 16-bit delayed replication sequence), this subroutine computes the ending index of the window.
Alternatively, if the given index points to the start of a "sub" window (which is the first node of a subset), then the subroutine returns the index of the last node.
[in] | LUN | - integer: i/o stream index into internal memory arrays. |
[in] | IWIN | - integer: starting index of window iteration. |
[out] | JWIN | - integer: ending index of window iteration. |
Definition at line 21 of file newwin.f.
References bort(), moda_usrint::inv, lstjpb(), moda_usrint::nval, and moda_usrint::val.