NCEPLIBS-bufr  11.6.0
 All Data Structures Files Functions Variables Pages
moda_tababd.F
Go to the documentation of this file.
1 C> @file
2 C> @brief Declare arrays for internal storage of DX BUFR tables.
3 
4 C> This module contains array and variable declarations used to
5 C> store DX BUFR tables internally for multiple I/O streams.
6 C>
7 C> @author J. Ator
8 C> @date 2014-12-10
9 
10  MODULE moda_tababd
11 
12 #ifndef MAXTBA_H
13 #define MAXTBA_H
14  USE modv_maxtba
15 #endif
16 
17 #ifndef MAXTBB_H
18 #define MAXTBB_H
19  USE modv_maxtbb
20 #endif
21 
22 #ifndef MAXTBD_H
23 #define MAXTBD_H
24  USE modv_maxtbd
25 #endif
26 
27 #ifndef NFILES_H
28 #define NFILES_H
29  USE modv_nfiles
30 #endif
31 
32 C> @var ntba
33 C> Number of Table A entries for each internal I/O stream
34 C> (up to a maximum of MAXTBA, whose value is stored in
35 C> array element 0).
36 C>
37 C> @var taba
38 C> Table A entries for each internal I/O stream.
39 C>
40 C> @var idna
41 C> Message types (in array element 1) and subtypes (in array
42 C> element 2) corresponding to taba.
43 C>
44 C> @var mtab
45 C> Entries within jump/link table corresponding to taba.
46 C>
47 C> @var ntbb
48 C> Number of Table B entries for each internal I/O stream
49 C> (up to a maximum of MAXTBB, whose value is stored in
50 C> array element 0).
51 C>
52 C> @var tabb
53 C> Table B entries for each internal I/O stream.
54 C>
55 C> @var idnb
56 C> Bit-wise representations of the FXY values corresponding
57 C> to tabb.
58 C>
59 C> @var ntbd
60 C> Number of Table D entries for each internal I/O stream
61 C> (up to a maximum of MAXTBD, whose value is stored in
62 C> array element 0).
63 C>
64 C> @var tabd
65 C> Table D entries for each internal I/O stream.
66 C>
67 C> @var idnd
68 C> Bit-wise representations of the FXY values corresponding
69 C> to tabd.
70 
71  INTEGER, ALLOCATABLE :: NTBA(:)
72  INTEGER, ALLOCATABLE :: NTBB(:)
73  INTEGER, ALLOCATABLE :: NTBD(:)
74  INTEGER, ALLOCATABLE :: MTAB(:,:)
75  INTEGER, ALLOCATABLE :: IDNA(:,:,:)
76  INTEGER, ALLOCATABLE :: IDNB(:,:)
77  INTEGER, ALLOCATABLE :: IDND(:,:)
78  CHARACTER*128, ALLOCATABLE :: TABA(:,:)
79  CHARACTER*128, ALLOCATABLE :: TABB(:,:)
80  CHARACTER*600, ALLOCATABLE :: TABD(:,:)
81 
82  END MODULE
This module declares and initializes the NFILES variable.
Definition: modv_NFILES.f90:13
This module contains array and variable declarations used to store DX BUFR tables internally for mult...
Definition: moda_tababd.F:10
This module declares and initializes the MAXTBB variable.
Definition: modv_MAXTBB.f:13
This module declares and initializes the MAXTBD variable.
Definition: modv_MAXTBD.f:13
This module declares and initializes the MAXTBA variable.
Definition: modv_MAXTBA.f:13