NCEPLIBS-bufr  12.1.0
modules_arrs.F90
Go to the documentation of this file.
1 
5 
12  integer :: maxbyt
14  integer, allocatable :: mbay(:,:)
16  integer, allocatable :: mbyt(:)
18  integer, allocatable :: ibay(:)
20  integer :: ibit
21 end module moda_bitbuf
22 
33  integer :: nbtm
40  integer :: ntamc
44  integer :: lstnod
46  integer :: lstnodct
49  logical :: linbtm
51  integer, allocatable :: inodtamc(:)
55  integer, allocatable :: ntco(:)
57  character*6, allocatable :: ctco(:,:)
59  integer, allocatable :: inodtco(:,:)
61  integer, allocatable :: nbtmse(:)
64  integer, allocatable :: istbtm(:)
67  integer, allocatable :: iszbtm(:)
71  integer, allocatable :: ibtmse(:,:)
72 end module moda_bitmaps
73 
83  integer, allocatable :: msglen(:)
85  integer, allocatable :: msgtxt(:,:)
86 end module moda_bufrmg
87 
99  integer :: junn = 0
101  integer :: jill
103  integer :: jimm
105  integer, allocatable :: jbay(:)
107  integer :: jbit
109  integer :: jbyt
111  integer :: jmsg
113  integer :: jsub
115  integer, allocatable :: jsr(:)
116 end module moda_bufrsr
117 
128  integer :: ncol
130  integer*8 :: incr
132  integer*8, allocatable :: matx(:,:)
134  character*(:), allocatable :: catx(:,:)
135 end module moda_comprs
136 
147  integer :: nrow
149  integer :: lunc
151  integer :: kbyt
156  logical :: flush
159  logical :: writ1
161  integer*8, allocatable :: kmin(:)
163  integer*8, allocatable :: kmax(:)
165  integer*8 :: imiss
169  logical, allocatable :: kmis(:)
172  integer, allocatable :: kbit(:)
177  integer, allocatable :: ityp(:)
180  integer, allocatable :: iwid(:)
182  character*(:), allocatable :: cstr(:)
184  integer, allocatable :: jlnode(:)
185 end module moda_comprx
186 
198  integer :: ncnem
200  character*8, allocatable :: cnem(:)
203  integer, allocatable :: ndc(:)
206  integer, allocatable :: idcach(:,:)
207 end module moda_dscach
208 
218  integer :: nh4wlc = 0
220  integer, allocatable :: luh4wlc(:)
222  character*14, allocatable :: sth4wlc(:)
224  character*120, allocatable :: chh4wlc(:)
225 end module moda_h4wlc
226 
238  integer, allocatable :: idrdm(:)
239 end module moda_idrdm
240 
247 module moda_ival
249  integer*8, allocatable :: ival(:)
250 end module moda_ival
251 
261  character*10, allocatable :: ttmp(:)
263  integer, allocatable :: itmp(:)
265  real*8, allocatable :: vtmp(:)
266 end module moda_ivttmp
267 
278  integer, allocatable :: lus(:)
279 end module moda_lushr
280 
286 module moda_mgwa
288  integer, allocatable :: mgwa(:)
289 end module moda_mgwa
290 
296 module moda_mgwb
298  integer, allocatable :: mgwb(:)
299 end module moda_mgwb
300 
307  integer, allocatable :: ids3(:)
309  character*6, allocatable :: cds3(:)
310 end module moda_s3list
311 
320  integer, allocatable :: nmsg(:)
322  integer, allocatable :: nsub(:)
324  integer, allocatable :: msub(:)
326  integer, allocatable :: inode(:)
328  integer, allocatable :: idate(:)
329 end module moda_msgcwd
330 
346  integer, allocatable :: msglim(:)
347 end module moda_msglim
348 
358  integer :: munit
360  integer :: mlast
362  integer :: ldxm
365  integer :: ndxm
369  integer :: ldxts
372  integer :: ndxts
374  integer :: mxdxm
376  integer :: mxdxw
380  integer, allocatable :: msgp(:)
382  integer, allocatable :: msgs(:)
385  integer, allocatable :: mdx(:)
387  integer, allocatable :: ipdxm(:)
389  integer, allocatable :: ifdxts(:)
392  integer, allocatable :: icdxts(:)
394  integer, allocatable :: ipmsgs(:)
395 end module moda_msgmem
396 
405  integer :: nmtb
407  integer :: nmtd
409  integer, allocatable :: ibfxyn(:)
411  character, allocatable :: cbscl(:,:)
413  character, allocatable :: cbsref(:,:)
415  character, allocatable :: cbbw(:,:)
417  character, allocatable :: cbunit(:,:)
419  character, allocatable :: cbmnem(:,:)
421  character, allocatable :: cbelem(:,:)
423  integer, allocatable :: idfxyn(:)
425  character, allocatable :: cdseq(:,:)
427  character, allocatable :: cdmnem(:,:)
429  integer, allocatable :: ndelem(:)
431  integer, allocatable :: idefxy(:)
432 end module moda_mstabs
433 
441  character*8, allocatable :: nem(:,:)
449  integer, allocatable :: irp(:,:)
454  integer, allocatable :: krp(:,:)
455 end module moda_nmikrp
456 
467  integer :: nnrv
471  integer :: ibtnrv
476  integer :: ipfnrv
479  character*8, allocatable :: tagnrv(:)
481  integer, allocatable :: inodnrv(:)
483  integer*8, allocatable :: nrv(:)
487  integer, allocatable :: isnrv(:)
491  integer, allocatable :: ienrv(:)
492 end module moda_nrv203
493 
514  integer, allocatable :: null(:)
515 end module moda_nulbfr
516 
525  integer, allocatable :: iefxyn(:,:)
527  character*4, allocatable :: cmdscb(:)
529  character*4, allocatable :: cmdscd(:)
531  character*120, allocatable :: ceelem(:,:)
532 end module moda_rdmtb
533 
542  integer :: nrst
544  integer, allocatable :: irnch(:)
546  integer, allocatable :: irbit(:)
548  character*10, allocatable :: crtag(:)
549 end module moda_rlccmn
550 
561  integer, allocatable :: ivmnem(:)
563  character*8, allocatable :: cmnem(:)
565  integer :: ns01v = 0
566 end module moda_s01cm
567 
587  integer, allocatable :: isc3(:)
589  character*8, allocatable :: tamnem(:)
590 end module moda_sc3bfr
591 
604  integer, allocatable :: iolun(:)
609  integer, allocatable :: iomsg(:)
610 end module moda_stbfr
611 
623  integer, allocatable :: iscodes(:)
624 end module moda_stcode
625 
633  integer, allocatable :: ntba(:)
636  integer, allocatable :: ntbb(:)
639  integer, allocatable :: ntbd(:)
641  integer, allocatable :: mtab(:,:)
644  integer, allocatable :: idna(:,:,:)
646  Integer, allocatable :: idnb(:,:)
648  integer, allocatable :: idnd(:,:)
650  character*128, allocatable :: taba(:,:)
652  character*128, allocatable :: tabb(:,:)
654  character*600, allocatable :: tabd(:,:)
655 end module moda_tababd
656 
666  integer :: ntab
668  character*10, allocatable :: tag(:)
683  character*3, allocatable :: typ(:)
685  integer, allocatable :: knt(:)
692  integer, allocatable :: jump(:)
699  integer, allocatable :: link(:)
706  integer, allocatable :: jmpb(:)
710  integer, allocatable :: ibt(:)
716  integer, allocatable :: irf(:)
722  integer, allocatable :: isc(:)
728  integer, allocatable :: itp(:)
732  real*8, allocatable :: vali(:)
738  integer, allocatable :: knti(:)
740  integer, allocatable :: iseq(:,:)
742  integer, allocatable :: jseq(:)
743 end module moda_tables
744 
757  integer, allocatable :: luncpy(:)
758 end module moda_ufbcpl
759 
771  integer, allocatable :: msgunp(:)
772 end module moda_unptyp
773 
781  integer, allocatable :: nbit(:)
783  integer, allocatable :: mbit(:)
784 end module moda_usrbit
785 
793  integer, allocatable :: nval(:)
795  integer, target, allocatable :: inv(:,:)
798  integer, allocatable :: nrfelm(:,:)
800  real*8, target, allocatable :: val(:,:)
801 end module moda_usrint
802 
810  integer, allocatable :: iutmp(:,:)
812  real*8, allocatable :: vutmp(:,:)
813 end module moda_usrtmp
814 
826 module moda_xtab
831  logical, allocatable :: xtab(:)
832 end module moda_xtab
833 
843  character*1 :: ctrt = 'N'
845  integer :: itryr
847  integer :: itrmo
849  integer :: itrdy
851  integer :: itrhr
853  integer :: itrmi
854 end module moda_tnkrcp
855 
864  character :: csmf = 'N'
865 end module moda_msgstd
866 
875  character :: ccmf = 'N'
876 end module moda_msgcmp
877 
887  character :: cdmf = 'N'
888 end module moda_tablef
Declare arrays and variables used to store BUFR messages internally for multiple file IDs.
integer, dimension(:), allocatable ibay
Current data subset.
integer ibit
Bit pointer within ibay.
integer, dimension(:,:), allocatable mbay
Current BUFR message for each file ID.
integer, dimension(:), allocatable mbyt
Length (in bytes) of current BUFR message for each file ID.
integer maxbyt
Maximum length of an output BUFR message.
Declare arrays and variables used to store bitmaps internally within a data subset definition.
integer, dimension(:), allocatable iszbtm
Size of bitmap (total number of entries, whether "set" (set to a value of 0) or not).
integer lstnod
Most recent jump/link table entry that was processed by function igetrfel() and whose corresponding v...
integer, dimension(:,:), allocatable inodtco
Entries within jump/link table which contain Table C operators.
integer ntamc
Number of Table A mnemonics in jump/link table (up to a maximum of mxtamc) which contain at least one...
integer, dimension(:), allocatable istbtm
Ordinal position in data subset definition corresponding to the first entry of the bitmap.
integer nbtm
Number of stored bitmaps for the current data subset (up to a maximum of mxbtm).
integer, dimension(:), allocatable inodtamc
Entries within jump/link table which contain Table A mnemonics.
integer, dimension(:,:), allocatable ibtmse
Ordinal positions in bitmap of bits that were "set" (set to a value of 0); these ordinal positions ca...
integer lstnodct
Current count of consecutive occurrences of lstnod.
logical linbtm
true if a bitmap is in the process of being read for the current data subset; false otherwise.
integer, dimension(:), allocatable nbtmse
Number of "set" entries (set to a value of 0) in the bitmap.
character *6, dimension(:,:), allocatable ctco
Table C operators corresponding to inodtco.
integer, dimension(:), allocatable ntco
Number of Table C operators (with an XX value of 21 or greater) within the data subset definition of ...
Declare arrays used to store, for each output file ID, a copy of the BUFR message that was most recen...
integer, dimension(:), allocatable msglen
Length (in integers) of BUFR message most recently written to each output file ID.
integer, dimension(:,:), allocatable msgtxt
BUFR message most recently written to each output file ID.
Declare arrays and variables needed to store the current position within a BUFR file.
integer jill
File status indicator of BUFR file.
integer jimm
Message status indicator of BUFR file.
integer, dimension(:), allocatable jsr
Indicator of stack status when entering subroutine rewnbf().
integer jmsg
Sequential number of BUFR message, counting from the beginning of the file.
integer jbit
Bit pointer within BUFR message.
integer jsub
Sequential number of BUFR data subset, counting from the beginning of the current BUFR message.
integer junn
File ID of BUFR file.
integer jbyt
Length (in bytes) of BUFR message.
integer, dimension(:), allocatable jbay
BUFR message.
Declare arrays and variables needed for the storage of data values needed when writing compressed dat...
integer ncol
Number of data subsets in message.
integer *8 incr
Increment used when compressing non-character data values.
character *(:), dimension(:,:), allocatable catx
Character data values for all data subsets in message.
integer *8, dimension(:,:), allocatable matx
Non-character data values for all data subsets in message.
Declare arrays and variable needed for the storage of data values needed when writing compressed data...
character *(:), dimension(:), allocatable cstr
Character data value, if corresponding ityp value is set to 3.
integer kbyt
Number of bytes required to store Sections 0, 1, 2, and 3 of message.
logical flush
Flush flag.
integer nrow
Number of data values for each data subset in message.
integer *8 imiss
"Missing" value used when compressing non-character data values.
integer *8, dimension(:), allocatable kmax
Maximum of each data value across all data subsets in message.
integer, dimension(:), allocatable jlnode
Jump/link table node corresponding to each data value.
logical writ1
Write-out flag.
integer, dimension(:), allocatable ityp
Type of each data value:
integer, dimension(:), allocatable iwid
Bit width of underlying data descriptor as defined within Table B for each data value.
integer lunc
File ID for output file.
integer, dimension(:), allocatable kbit
Number of bits needed to hold the increments for this data value within each data subset of the messa...
logical, dimension(:), allocatable kmis
"Missing" values flag.
integer *8, dimension(:), allocatable kmin
Minimum of each data value across all data subsets in message.
Declare arrays and variables for the internal Table A mnemonic cache that is used for Section 3 decod...
character *8, dimension(:), allocatable cnem
Table A mnemonics.
integer ncnem
Number of entries in the internal Table A mnemonic cache (up to a maximum of mxcnem).
integer, dimension(:,:), allocatable idcach
WMO bit-wise representations of the child descriptors for the corresponding Table A mnemonic in cnem.
integer, dimension(:), allocatable ndc
Number of child descriptors for the corresponding Table A mnemonic in cnem.
Declare arrays and variables needed to store long character strings (greater than 8 bytes) via subrou...
integer nh4wlc
Number of long character strings being stored.
character *14, dimension(:), allocatable sth4wlc
Table B mnemonics associated with long character strings.
integer, dimension(:), allocatable luh4wlc
File ID for associated output file.
character *120, dimension(:), allocatable chh4wlc
Long character strings.
Declare an array used by subroutine readerme() to read in a new DX dictionary table as a consecutive ...
integer, dimension(:), allocatable idrdm
DX BUFR tables message count for each file ID.
Declare an array used to pack or unpack all of the values of a BUFR data subset.
integer *8, dimension(:), allocatable ival
BUFR data subset values.
Declare arrays which provide working space in several subprograms (usrtpl() and ufbcup()) which manip...
character *10, dimension(:), allocatable ttmp
tag array elements for new sections of a growing subset buffer.
real *8, dimension(:), allocatable vtmp
val array elements for new sections of a growing subset buffer.
integer, dimension(:), allocatable itmp
inv array elements for new sections of a growing subset buffer.
Declare an array used by subroutine makestab() to keep track of which logical units share DX BUFR tab...
integer, dimension(:), allocatable lus
Tracking index for each file ID.
Declare an array used by various subroutines and functions to hold a temporary working copy of a BUFR...
integer, dimension(:), allocatable mgwa
Temporary working copy of BUFR message.
Declare an array used by various subroutines and functions to hold a temporary working copy of a BUFR...
integer, dimension(:), allocatable mgwb
Temporary working copy of BUFR message.
Declare a variable used to indicate whether output BUFR messages should be compressed.
character ccmf
Flag indicating whether BUFR output messages are to be compressed; this variable is initialized to a ...
Declare arrays used to store information about the current BUFR message that is in the process of bei...
integer, dimension(:), allocatable inode
Table A mnemonic for type of BUFR message.
integer, dimension(:), allocatable idate
Section 1 date-time of message.
integer, dimension(:), allocatable nmsg
Current message pointer within logical unit.
integer, dimension(:), allocatable msub
Total number of data subsets in message.
integer, dimension(:), allocatable nsub
Current subset pointer within message.
Declare an array used to keep track of which logical units should not have any empty (zero data subse...
integer, dimension(:), allocatable msglim
Tracking index for each file ID.
Declare arrays and variables used to store the contents of one or more BUFR files within internal mem...
integer, dimension(:), allocatable msgp
Pointers to the beginning of each message within msgs (up to a maximum of maxmsg, and where array ele...
integer, dimension(:), allocatable ipmsgs
Pointers to first message within msgs for which each DX BUFR table applies.
integer, dimension(:), allocatable msgs
BUFR messages read from one or more BUFR files.
integer, dimension(:), allocatable icdxts
Number of consecutive messages within mdx which constitute each DX BUFR table, beginning with the cor...
integer mxdxm
Maximum number of DX BUFR table messages that can be stored within mdx.
integer, dimension(:), allocatable ifdxts
Pointers to the beginning of each DX BUFR table within mdx.
integer munit
Fortran logical unit number for use in accessing contents of BUFR files within internal memory.
integer ndxm
Number of DX BUFR table messages stored within mdx (up to a maximum of mxdxm).
integer ldxm
Number of array elements filled within mdx (up to a maximum of mxdxw).
integer mlast
Number of array elements filled within msgs (up to a maximum of maxmem).
integer ldxts
Number of DX BUFR table that is currently in scope, depending on which BUFR message within msgs is cu...
integer ndxts
Number of DX BUFR tables represented by the messages within mdx (up to a maximum of mxdxts).
integer, dimension(:), allocatable mdx
DX BUFR table messages read from one or more BUFR files, for use in decoding the messages in msgs.
integer mxdxw
Maximum number of entries that can be stored within mdx.
integer, dimension(:), allocatable ipdxm
Pointers to the beginning of each message within mdx.
Declare a variable used to indicate whether output BUFR messages should be standardized.
character csmf
Flag indicating whether BUFR output messages are to be standardized; this variable is initialized to ...
Declare arrays and variables used to store master Table B and Table D entries within internal memory.
integer, dimension(:), allocatable idfxyn
WMO bit-wise representations of FXY numbers for master Table D.
character, dimension(:,:), allocatable cbunit
Units corresponding to ibfxyn.
integer nmtb
Number of master Table B entries (up to a maximum of mxmtbb).
character, dimension(:,:), allocatable cbbw
Bit widths corresponding to ibfxyn.
character, dimension(:,:), allocatable cdseq
Sequence names corresponding to idfxyn.
character, dimension(:,:), allocatable cbmnem
Mnemonics corresponding to ibfxyn.
integer, dimension(:), allocatable ndelem
Numbers of child descriptors corresponding to idfxyn.
character, dimension(:,:), allocatable cbelem
Element names corresponding to ibfxyn.
character, dimension(:,:), allocatable cbscl
Scale factors corresponding to ibfxyn.
character, dimension(:,:), allocatable cdmnem
Mnemonics corresponding to idfxyn.
character, dimension(:,:), allocatable cbsref
Reference values corresponding to ibfxyn.
integer nmtd
Number of master Table D entries (up to a maximum of mxmtbd).
integer, dimension(:), allocatable idefxy
WMO bit-wise representations of child descriptors corresponding to idfxyn.
integer, dimension(:), allocatable ibfxyn
WMO bit-wise representations of FXY numbers for master Table B.
Declare arrays used by various subroutines to hold information about Table D sequences.
integer, dimension(:,:), allocatable krp
Replication counts corresponding to nem:
integer, dimension(:,:), allocatable irp
Replication indicators corresponding to nem:
character *8, dimension(:,:), allocatable nem
Child mnemonics within Table D sequences.
Declare arrays and variables for use with any 2-03-YYY (change reference value) operators present wit...
integer, dimension(:), allocatable ienrv
End of entry range in jump/link table, within which the corresponding new reference value in nrv will...
character *8, dimension(:), allocatable tagnrv
Table B mnemonic to which the corresponding new reference value in nrv applies.
integer, dimension(:), allocatable isnrv
Start of entry range in jump/link table, within which the corresponding new reference value in nrv wi...
integer nnrv
Number of entries in the jump/link table which contain new reference values (up to a maximum of mxnrv...
integer *8, dimension(:), allocatable nrv
New reference values corresponding to inodnrv.
integer ipfnrv
A number between 1 and nnrv, denoting the first entry within the module arrays which applies to the c...
integer, dimension(:), allocatable inodnrv
Entries within jump/link table which contain new reference values.
integer ibtnrv
Number of bits in Section 4 occupied by each new reference value for the current 2-03-YYY operator in...
Declare an array used to store a switch for each file ID, indicating whether any BUFR messages should...
integer, dimension(:), allocatable null
Output switch for each file ID:
Declare arrays and variables used to store master Table B and Table D entries within internal memory.
character *120, dimension(:,:), allocatable ceelem
Element names corresponding to iefxyn.
character *4, dimension(:), allocatable cmdscb
Descriptor codes for Table B elements.
integer, dimension(:,:), allocatable iefxyn
WMO bit-wise representations of child descriptors of Table D sequences.
character *4, dimension(:), allocatable cmdscd
Descriptor codes for Table D sequences.
Declare arrays and variables needed to store information about long character strings (greater than 8...
integer nrst
Number of long character strings in data subset.
integer, dimension(:), allocatable irnch
Lengths (in bytes) of long character strings.
integer, dimension(:), allocatable irbit
Pointers in data subset to first bits of long character strings.
character *10, dimension(:), allocatable crtag
Table B mnemonics associated with long character strings.
Declare arrays and variables used to store custom values for certain mnemonics within Sections 0 and ...
integer, dimension(:), allocatable ivmnem
Custom values for use within Sections 0 and 1 of all future output BUFR messages written to all Fortr...
integer ns01v
Number of custom values stored.
character *8, dimension(:), allocatable cmnem
Section 0 and 1 mnemonics corresponding to ivmnem.
Declare arrays used by various subroutines and functions to hold a temporary working copy of a Sectio...
integer, dimension(:), allocatable ids3
Temporary working copy of Section 3 descriptor list in integer form.
character *6, dimension(:), allocatable cds3
Temporary working copy of Section 3 descriptor list in character form.
Declare an array used to store a switch for each file ID, indicating whether BUFR messages read from ...
character *8, dimension(:), allocatable tamnem
Table A mnemonic most recently read from each file ID, if isc3 = 1 for that stream.
integer, dimension(:), allocatable isc3
Section 3 switch for each file ID:
Declare arrays used to store file and message status indicators for all logical units that have been ...
integer, dimension(:), allocatable iolun
File status indicators.
integer, dimension(:), allocatable iomsg
Message status indicator corresponding to iolun, denoting whether a BUFR message is currently open wi...
Declare an array used to store a status code for each file ID if an error or other abnormal result oc...
integer, dimension(:), allocatable iscodes
Abnormal status codes.
Declare arrays and variables used to store DX BUFR tables internally for multiple file IDs.
integer, dimension(:), allocatable ntba
Number of Table A entries for each file ID (up to a maximum of maxtba, whose value is stored in array...
character *600, dimension(:,:), allocatable tabd
Table D entries for each file ID.
character *128, dimension(:,:), allocatable taba
Table A entries for each file ID.
integer, dimension(:,:), allocatable mtab
Entries within jump/link table corresponding to taba.
integer, dimension(:,:,:), allocatable idna
Message types (in array element 1) and subtypes (in array element 2) corresponding to taba.
integer, dimension(:), allocatable ntbd
Number of Table D entries for each file ID (up to a maximum of maxtbd, whose value is stored in array...
integer, dimension(:), allocatable ntbb
Number of Table B entries for each file ID (up to a maximum of maxtbb, whose value is stored in array...
integer, dimension(:,:), allocatable idnd
WMO bit-wise representations of the FXY values corresponding to tabd.
integer, dimension(:,:), allocatable idnb
WMO bit-wise representations of the FXY values corresponding to tabb.
character *128, dimension(:,:), allocatable tabb
Table B entries for each file ID.
Declare a variable used to indicate whether master code and flag tables should be read.
character cdmf
Flag indicating whether to include code and flag table information during reads of master BUFR tables...
Declare arrays and variables used to store the internal jump/link table.
integer, dimension(:), allocatable jseq
Temporary storage used in expanding sequences.
integer, dimension(:), allocatable irf
Reference values corresponding to tag and typ:
integer, dimension(:,:), allocatable iseq
Temporary storage used in expanding sequences.
integer, dimension(:), allocatable isc
Scale factors corresponding to tag and typ:
integer, dimension(:), allocatable ibt
Bit widths corresponding to tag and typ:
integer, dimension(:), allocatable knt
Temporary storage used in calculating delayed replication counts.
real *8, dimension(:), allocatable vali
Initialized data values corresponding to typ:
character *3, dimension(:), allocatable typ
Type indicators corresponding to tag:
integer, dimension(:), allocatable jmpb
Jump backward indices corresponding to tag and typ:
character *10, dimension(:), allocatable tag
Mnemonics in the jump/link table.
integer ntab
Number of entries in the jump/link table.
integer, dimension(:), allocatable jump
Jump forward indices corresponding to tag and typ:
integer, dimension(:), allocatable itp
Integer type values corresponding to typ:
integer, dimension(:), allocatable link
Link indices corresponding to tag, typ and jmpb:
integer, dimension(:), allocatable knti
Initialized replication counts corresponding to typ and jump:
Declare variables used to store tank receipt time information within Section 1 of BUFR messages.
integer itrhr
Tank receipt hour.
integer itryr
Tank receipt year.
integer itrdy
Tank receipt day.
character *1 ctrt
Flag indicating whether tank receipt times are to be included within output BUFR messages; this varia...
integer itrmi
Tank receipt minute.
integer itrmo
Tank receipt month.
Declare an array used to store, for each file ID, the logical unit number corresponding to a separate...
integer, dimension(:), allocatable luncpy
Logical unit numbers used to copy long character strings between BUFR data subsets.
Declare an array used to store, for each file ID from which a BUFR message is currently being read as...
integer, dimension(:), allocatable msgunp
Flag indicating how to unpack data subsets from BUFR message:
Declare arrays for internal storage of pointers to BUFR data subset values.
integer, dimension(:), allocatable nbit
Length (in bits) of each packed data value in data subset.
integer, dimension(:), allocatable mbit
Pointer in data subset to first bit of each packed data value.
Declare arrays used to store data values and associated metadata for the current BUFR data subset in ...
integer, dimension(:), allocatable nval
Number of data values in BUFR data subset.
real *8, dimension(:,:), allocatable, target val
Data values.
integer, dimension(:,:), allocatable, target inv
Inventory pointer which links each data value to its corresponding node in the internal jump/link tab...
integer, dimension(:,:), allocatable nrfelm
Referenced data value, for data values which refer to a previous data value in the BUFR data subset v...
Declare arrays used in subroutine rcstpl() to store subset segments that are being copied from a subs...
integer, dimension(:,:), allocatable iutmp
inv array elements for new sections of a growing subset buffer.
real *8, dimension(:,:), allocatable vutmp
val array elements for new sections of a growing subset buffer.
Declare an array used to track, for each file ID, whether the DX BUFR table associated with the corre...
logical, dimension(:), allocatable xtab
Tracking index for each file ID.