The routine returns a logical value indicating whether an NDF component has a defined value (or values).

CALL NDF_STATE( INDF, COMP, STATE, STATUS )

INDF = INTEGER (Given)

COMP = CHARACTER $\ast$ ( $\ast$ ) (Given)

STATE = LOGICAL (Returned)

STATUS = INTEGER (Given and Returned)

• If a component name of ’EXTENSION’ is given, then a .TRUE. result will be returned if one or more extensions are present in the NDF.

• A comma-separated list of component names may also be given, in which case the routine will return the logical "AND" of the states of the specified components (i.e. a .TRUE. result will be returned only if all the components have defined values).