NCEPLIBS-bufr  11.5.0
 All Data Structures Files Functions Variables Pages
upftbv.f File Reference

Determine the bit settings equivalent to a numerical flag table value. More...

Go to the source code of this file.

Functions/Subroutines

subroutine upftbv (LUNIT, NEMO, VAL, MXIB, IBIT, NIB)
 Given a Table B mnemonic with flag table units and a corresponding numerical data value, this subroutine determines the bit settings equivalent to that numerical value. More...
 

Detailed Description

Determine the bit settings equivalent to a numerical flag table value.

Definition in file upftbv.f.

Function/Subroutine Documentation

subroutine upftbv (   LUNIT,
character*(*)  NEMO,
real*8  VAL,
  MXIB,
integer, dimension (*)  IBIT,
  NIB 
)

Given a Table B mnemonic with flag table units and a corresponding numerical data value, this subroutine determines the bit settings equivalent to that numerical value.

Author
J. Ator
Date
2005-11-29
Parameters
[in]LUNIT- integer: Fortran logical unit number for BUFR file
[in]NEMO- character*(*): Table B mnemonic with flag table units
[in]VAL- real*8: Value corresponding to NEMO
[in]MXIB- integer: Dimensioned size (in integers) of IBIT; used by the subroutine to ensure that it doesn't overflow the IBIT array
[out]IBIT- integer(*): Bit numbers which were set to "On" (i.e. set to "1") in VAL
[out]NIB- integer: Number of bit numbers returned in IBIT
Remarks
  • This subroutine is the logical inverse of function pkftbv().
  • According to the WMO standard, bits within a bit field are numbered from left to right, so bit #1 is always the high-order (i.e. most significant) bit in any bit field.

Program history log:

  • 2005-11-29 J. Ator – Original version
  • 2014-12-10 J. Ator – Use modules instead of COMMON blocks

Definition at line 35 of file upftbv.f.

References bort(), nemtab(), status(), and valx().

Referenced by ufbdmp(), and ufdump().