NCEPLIBS-bufr  12.0.0
icmpdx.f File Reference

Check whether two BUFR files have the same DX BUFR table information. More...

Go to the source code of this file.

Functions/Subroutines

integer function icmpdx (LUD, LUN)
 This function determines whether the full set of associated DX BUFR Table information is identical between two Fortran logical units. More...
 

Detailed Description

Check whether two BUFR files have the same DX BUFR table information.

Author
J. Ator
Date
2009-06-18

Definition in file icmpdx.f.

Function/Subroutine Documentation

◆ icmpdx()

integer function icmpdx (   LUD,
  LUN 
)

This function determines whether the full set of associated DX BUFR Table information is identical between two Fortran logical units.

Note that two different logical units can have identical DX BUFR Table information associated with them even if they aren't actually sharing the same DX BUFR table.

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
icmpdx – integer: Flag indicating whether the BUFR file associated with LUD and the BUFR file associated with LUN have the same DX BUFR table information
  • 0 = No
  • 1 = Yes
Author
J. Ator
Date
2009-06-18

Definition at line 27 of file icmpdx.f.

References moda_tababd::idna, moda_tababd::idnb, moda_tababd::idnd, ishrdx(), moda_tababd::ntba, moda_tababd::ntbb, moda_tababd::ntbd, moda_tababd::taba, moda_tababd::tabb, and moda_tababd::tabd.

Referenced by iok2cpy(), and makestab().