NCEPLIBS-bufr  12.0.0
newwin.f File Reference

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...
 

Detailed Description

Computes the ending index of the window.

Author
J. Woollen
Date
1994-01-06

Definition in file newwin.f.

Function/Subroutine Documentation

◆ newwin()

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.

Note
See the docblock in bufr archive library subroutine getwin() for an explanation of "windows" within the context of a bufr data subset.
Parameters
[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.
Author
J. Woollen
Date
1994-01-06

Definition at line 21 of file newwin.f.

References bort(), moda_usrint::inv, lstjpb(), moda_usrint::nval, and moda_usrint::val.

Referenced by drstpl(), and ufbrw().