44 SUBROUTINE nemtab(LUN,NEMO,IDN,TAB,IRET)
56 folval = nemo(1:1).EQ.
'.'
64 nemt = tabb(i,lun)(7:14)
70 ELSEIF(folval.AND.nemt(1:1).EQ.
'.')
THEN
72 IF(nemt(j:j).NE.
'.' .AND. nemt(j:j).NE.nemo(j:j)) goto 1
90 nemt = tabd(i,lun)(7:14)
103 READ(nemo,
'(1X,I2)') iret
This module contains array and variable declarations used to store DX BUFR tables internally for mult...
function ifxy(ADSC)
This function converts an FXY value from its 6 character representation to its bit-wise (integer) rep...
subroutine nemtab(LUN, NEMO, IDN, TAB, IRET)
This subroutine returns information about a descriptor from the internal DX BUFR tables, based on the mnemonic associated with that descriptor.
INTEGER function iokoper(NEMO)
This function determines whether a specified mnemonic is a Table C operator supported by the BUFRLIB ...