NCEPLIBS-bufr  11.7.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:

Date Programmer Comments
2005-11-29 J. Ator Original version
2014-12-10 J. Ator Use modules instead of COMMON blocks

Definition at line 37 of file upftbv.f.

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

Referenced by ufbdmp(), and ufdump().