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

upftbv()

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(), moda_tababd::tabb, and valx().

Referenced by ufbdmp(), and ufdump().