NCEPLIBS-bufr
12.0.1
|
Read master Table D information from local file system. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | rdmtbd (LUNSTD, LUNLTD, MXMTBD, MXELEM, IMT, IMTV, IOGCE, ILTV, NMTBD, IMFXYN, CMMNEM, CMDSC, CMSEQ, NMELEM, IEFXYN, CEELEM) |
This subroutine reads master Table D information from two separate ASCII files (one standard and one local) and then merges the output into a single set of arrays. More... | |
subroutine rdmtbd | ( | LUNSTD, | |
LUNLTD, | |||
MXMTBD, | |||
MXELEM, | |||
IMT, | |||
IMTV, | |||
IOGCE, | |||
ILTV, | |||
NMTBD, | |||
integer, dimension(*) | IMFXYN, | ||
character, dimension(8,*) | CMMNEM, | ||
character*4, dimension(*) | CMDSC, | ||
character, dimension(120,*) | CMSEQ, | ||
integer, dimension(*) | NMELEM, | ||
integer, dimension(mxmtbd,mxelem) | IEFXYN, | ||
character*120, dimension(mxmtbd,mxelem) | CEELEM | ||
) |
This subroutine reads master Table D information from two separate ASCII files (one standard and one local) and then merges the output into a single set of arrays.
Each of the two ASCII files must already be individually sorted in ascending order with respect to the FXY numbers.
[in] | LUNSTD | – integer: Fortran logical unit number for ASCII file containing standard Table D information |
[in] | LUNLTD | – integer: Fortran logical unit number for ASCII file containing local Table D information |
[in] | MXMTBD | – integer: Dimensioned size (in integers) of merged output arrays; used by the subroutine to ensure that it doesn't overflow these arrays |
[in] | MXELEM | – integer: Maximum number of elements to be stored per Table D sequence within merged output arrays; used by the subroutine to ensure that it doesn't overflow these arrays |
[out] | IMT | – integer: Master table
|
[out] | IMTV | – integer: Version number of master table
|
[out] | IOGCE | – integer: Originating center
|
[out] | ILTV | – integer: Version number of local table
|
[out] | NMTBD | – integer: Number of entries in merged output arrays |
[out] | IMFXYN | – integer(*): Merged array containing bit-wise representations of FXY numbers |
[out] | CMMNEM | – character*8(*): Merged array containing mnemonics |
[out] | CMDSC | – character*4(*): Merged array containing descriptor codes |
[out] | CMSEQ | – character*120(*): Merged array containing sequence names |
[out] | NMELEM | – integer(*): Merged array containing number of elements stored for each sequence |
[out] | IEFXYN | – integer(*,*): Merged array containing bit-wise representations of element FXY numbers |
[out] | CEELEM | – character*120(*,*): Merged array containing element names |
Definition at line 57 of file rdmtbd.f.
References bort(), getntbe(), gettbh(), sntbde(), and wrdlen().
Referenced by ireadmt().