dxinit.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	dxinit (LUN, IOI)
	THIS SUBROUTINE INITIALIZES THE INTERNAL ARRAYS (IN MODULE TABABD) HOLDING THE DICTIONARY TABLE. More...

Detailed Description

Author

WOOLLEN

Date

1994-01-06

Definition in file dxinit.f.

Function/Subroutine Documentation

dxinit()

subroutine dxinit	(		LUN,
			IOI
	)

THIS SUBROUTINE INITIALIZES THE INTERNAL ARRAYS (IN MODULE TABABD) HOLDING THE DICTIONARY TABLE.

IT THEN INITIALIZES THE TABLE WITH APRIORI TABLE B AND D ENTRIES (OPTIONAL).

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) 2003-11-04 S. BENDER – ADDED REMARKS/BUFRLIB ROUTINE INTERDEPENDENCIES 2003-11-04 D. KEYSER – UNIFIED/PORTABLE FOR WRF; ADDED DOCUMENTATION (INCLUDING HISTORY) 2009-03-23 J. ATOR – REMOVE INITIALIZATION OF COMMON /MSGCWD/ 2014-12-10 J. ATOR – USE MODULES INSTEAD OF COMMON BLOCKS

USAGE: CALL DXINIT (LUN, IOI) INPUT ARGUMENT LIST: LUN - INTEGER: I/O STREAM INDEX INTO INTERNAL MEMORY ARRAYS IOI - INTEGER: SWITCH: 0 = do not initialize the table with apriori Table B and D entries else = initialize the table with apriori Table B and D entries

REMARKS: THIS ROUTINE CALLS: ADN30 IFXY PKTDD THIS ROUTINE IS CALLED BY: CPBFDX OPENBF RDBFDX RDUSDX READERME READS3 Normally not called by any application programs.

Definition at line 40 of file dxinit.f.

References moda_tababd::idnb, moda_tababd::idnd, ifxy(), moda_tababd::mtab, moda_tababd::ntba, moda_tababd::ntbb, moda_tababd::ntbd, pktdd(), moda_tababd::taba, moda_tababd::tabb, and moda_tababd::tabd.

Referenced by cpbfdx(), openbf(), rdbfdx(), rdmemm(), rdusdx(), readerme(), and reads3().