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().