icbfms.f File Reference

Test whether a character string is "missing". More...

Go to the source code of this file.

Functions/Subroutines
recursive function	icbfms (STR, LSTR)
	This function provides a handy way to check whether a character string returned from a previous call to subroutine readlc() was encoded as "missing" (all bits set to 1) within the actual BUFR data subset. More...

Detailed Description

Test whether a character string is "missing".

Author

J. Ator

Date

2012-06-07

Definition in file icbfms.f.

Function/Subroutine Documentation

icbfms()

recursive function icbfms	(	character*(*)	STR,
			LSTR
	)

This function provides a handy way to check whether a character string returned from a previous call to subroutine readlc() was encoded as "missing" (all bits set to 1) within the actual BUFR data subset.

Parameters

[in]	STR	– character*(*): String
[in]	LSTR	– integer: Length of string, i.e. number of characters within STR to be tested

Returns

icbfms – integer:

• 0 = STR is not "missing"
• 1 = STR is "missing"

Remarks

• The use of an integer return code allows this function to be called in a logical context from application programs written in C as well as in Fortran.

Author

J. Ator

Date

2012-06-07

Definition at line 24 of file icbfms.f.

References modv_im8b::im8b, iupm(), and x84().

Referenced by rdcmps(), rdtree(), ufbdmp(), and ufdump().