nemtab.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	nemtab (LUN, NEMO, IDN, TAB, IRET)
	THIS SUBROUTINE SEARCHES FOR MNEMONIC NEMO WITHIN THE INTERNAL TABLE B AND D ARRAYS HOLDING THE DICTIONARY TABLE (ARRAYS IN MODULE TABABD) AND, IF FOUND, RETURNS INFORMATION ABOUT THAT MNEMONIC FROM WITHIN THESE ARRAYS. More...

Detailed Description

Author

WOOLLEN

Date

1994-01-06

Definition in file nemtab.f.

Function/Subroutine Documentation

subroutine nemtab	(		LUN,
		character*(*)	NEMO,
			IDN,
		character*1	TAB,
			IRET
	)

THIS SUBROUTINE SEARCHES FOR MNEMONIC NEMO WITHIN THE INTERNAL TABLE B AND D ARRAYS HOLDING THE DICTIONARY TABLE (ARRAYS IN MODULE TABABD) AND, IF FOUND, RETURNS INFORMATION ABOUT THAT MNEMONIC FROM WITHIN THESE ARRAYS.

OTHERWISE, IT CHECKS WHETHER NEMO IS A TABLE C OPERATOR DESCRIPTOR AND, IF SO, DIRECTLY COMPUTES AND RETURNS SIMILAR INFORMATION ABOUT THAT DESCRIPTOR. THIS SUBROUTINE MAY BE USEFUL TO APPLICATION PROGRAMS WHICH WANT TO CHECK WHETHER A PARTICULAR MNEMONIC IS IN THE DICTIONARY. IN THIS CASE, BUFR ARCHIVE LIBRARY SUBROUTINE OPENBF MUST FIRST BE CALLED TO STORE THE DICTIONARY TABLE INTERNALLY, AND BUFR ARCHIVE LIBRARY SUBROUTINE STATUS MUST BE CALLED TO CONNECT THE LOGICAL UNIT NUMBER FOR THE BUFR FILE OPENED IN OPENBF TO LUN.

PROGRAM HISTORY LOG: 1994-01-06 J. WOOLLEN – ORIGINAL AUTHOR 1995-06-28 J. WOOLLEN – INCREASED THE SIZE OF INTERNAL BUFR TABLE ARRAYS IN ORDER TO HANDLE BIGGER FILES 1999-11-18 J. WOOLLEN – THE NUMBER OF BUFR FILES WHICH CAN BE OPENED AT ONE TIME INCREASED FROM 10 TO 32 (NECESSARY IN ORDER TO PROCESS MULTIPLE BUFR FILES UNDER THE MPI) 2000-09-19 J. WOOLLEN – ADDED CAPABILITY TO ENCODE AND DECODE DATA USING THE OPERATOR DESCRIPTORS (BUFR TABLE C) FOR CHANGING WIDTH AND CHANGING SCALE 2003-11-04 J. ATOR – ADDED DOCUMENTATION 2003-11-04 S. BENDER – ADDED REMARKS/BUFRLIB ROUTINE INTERDEPENDENCIES 2003-11-04 D. KEYSER – UNIFIED/PORTABLE FOR WRF; ADDED HISTORY DOCUMENTATION 2005-11-29 J. ATOR – ADDED SUPPORT FOR 207 AND 208 OPERATORS 2010-03-19 J. ATOR – ADDED SUPPORT FOR 204 AND 205 OPERATORS 2012-03-02 J. ATOR – ADDED SUPPORT FOR 203 OPERATOR 2014-12-10 J. ATOR – USE MODULES INSTEAD OF COMMON BLOCKS 2015-02-25 J. ATOR – ALLOW PROCESSING OF 2-2X, 2-3X AND 2-4X NON-MARKER OPERATORS IN DX TABLES

USAGE: CALL NEMTAB (LUN, NEMO, IDN, TAB, IRET) INPUT ARGUMENT LIST: LUN - INTEGER: I/O STREAM INDEX INTO INTERNAL MEMORY ARRAYS NEMO - CHARACTER*(*): MNEMONIC TO SEARCH FOR

OUTPUT ARGUMENT LIST: IDN - INTEGER: BIT-WISE REPRESENTATION OF FXY VALUE CORRESPONDING TO NEMO (IF NEMO WAS FOUND) TAB - CHARACTER*1: INTERNAL TABLE ARRAY IN WHICH NEMO WAS FOUND: 'B' = Table B array 'C' = Table C array 'D' = Table D array IRET - INTEGER: POSITIONAL INDEX OF NEMO WITHIN TAB 0 = NEMO was not found within any of the Table B, C, or D arrays

REMARKS: THIS ROUTINE CALLS: IFXY IOKOPER THIS ROUTINE IS CALLED BY: CHEKSTAB CMSGINI ELEMDX GETCFMNG IGETRFEL MSGINI NEMDEFS SEQSDX STSEQ TABSUB UFBDMP UFBQCD UFDUMP UPFTBV Also called by application programs (see ABSTRACT).

Definition at line 66 of file nemtab.f.

References ifxy(), and iokoper().

Referenced by chekstab(), cmsgini(), elemdx(), getcfmng(), igetrfel(), msgini(), nemdefs(), seqsdx(), stseq(), tabsub(), ufbdmp(), ufbqcd(), ufdump(), and upftbv().