NCEPLIBS-bufr  11.6.0
 All Data Structures Files Functions Variables Pages
moda_nrv203.F
Go to the documentation of this file.
1 C> @file
2 C> @brief Declare arrays for internal storage of changed
3 C> reference values.
4 
5 C> This module contains array and variable declarations for use
6 C> with any 2-03-YYY (change reference value) operators present
7 C> within the internal jump/link table.
8 C>
9 C> <p>Data values within this module are stored by subroutine
10 C> tabsub().
11 C>
12 C> @author J. Ator
13 C> @date 2012-03-02
14 
15  MODULE moda_nrv203
16 
17 #ifndef MXNRV_H
18 #define MXNRV_H
19  USE modv_mxnrv
20 #endif
21 
22 C> @var nnrv
23 C> Number of entries in the jump/link table which contain
24 C> new reference values (up to a maximum of MXNRV).
25 C>
26 C> @var ibtnrv
27 C> Number of bits in Section 4 occupied by each new
28 C> reference value for the current 2-03-YYY operator in
29 C> scope; set to 0 if no such operator is currently in
30 C> scope.
31 C>
32 C> @var ipfnrv
33 C> A number between 1 and nnrv, denoting the first entry
34 C> within the module arrays which applies to the current
35 C> data subset in scope; set to 0 if no 2-03-YYY operators
36 C> have been applied to the current data subset in scope.
37 C>
38 C> @var tagnrv
39 C> Table B mnemonic to which the corresponding new
40 C> reference value in nrv applies.
41 C>
42 C> @var nrv
43 C> New reference values corresponding to inodnrv.
44 C>
45 C> @var inodnrv
46 C> Entries within jump/link table which contain new
47 C> reference values.
48 C>
49 C> @var isnrv
50 C> Start of entry range in jump/link table, within which
51 C> the corresponding new reference value in nrv will be
52 C> applied to all occurrences of the corresponding
53 C> Table B mnemonic in tagnrv.
54 C>
55 C> @var ienrv
56 C> End of entry range in jump/link table, within which
57 C> the corresponding new reference value in nrv will be
58 C> applied to all occurrences of the corresponding
59 C> Table B mnemonic in tagnrv.
60 
61  INTEGER :: NNRV
62  INTEGER :: IBTNRV
63  INTEGER :: IPFNRV
64  CHARACTER*8, ALLOCATABLE :: TAGNRV(:)
65  INTEGER, ALLOCATABLE :: INODNRV(:)
66  INTEGER, ALLOCATABLE :: NRV(:)
67  INTEGER, ALLOCATABLE :: ISNRV(:)
68  INTEGER, ALLOCATABLE :: IENRV(:)
69 
70  END MODULE
This module declares and initializes the MXNRV variable.
Definition: modv_MXNRV.f:13
This module contains array and variable declarations for use with any 2-03-YYY (change reference valu...
Definition: moda_nrv203.F:15