ishrdx.f File Reference

Check whether two BUFR files are sharing the same DX BUFR table. More...

Go to the source code of this file.

Functions/Subroutines
integer function	ishrdx (LUD, LUN)
	This function determines whether the same DX BUFR Table is being shared between two Fortran logical units. More...

Detailed Description

Check whether two BUFR files are sharing the same DX BUFR table.

Author

J. Ator

Date

2009-06-18

Definition in file ishrdx.f.

Function/Subroutine Documentation

ishrdx()

integer function ishrdx	(		LUD,
			LUN
	)

This function determines whether the same DX BUFR Table is being shared between two Fortran logical units.

Parameters

[in]	LUD	– integer: Internal I/O stream index associated with first BUFR file
[in]	LUN	– integer: Internal I/O stream index associated with second BUFR file

Returns

ishrdx – integer: Flag indicating whether the same DX BUFR table is being shared between the BUFR file associated with LUD and the BUFR file associated with LUN

• 0 = No
• 1 = Yes

Author

J. Ator

Date

2009-06-18

Definition at line 23 of file ishrdx.f.

References moda_tababd::mtab, and moda_tababd::ntba.

Referenced by icmpdx(), and makestab().