NDF_XSTAT - Determine if a named NDF extension exists

Description:

The routine returns a logical value indicating whether a named extension is present in an NDF.

Invocation:

CALL NDF_XSTAT( INDF, XNAME, THERE, STATUS )

Arguments:

INDF = INTEGER (Given)

NDF identifier.

XNAME = CHARACTER $*$ ( $*$ ) (Given)

Name of the extension.

THERE = LOGICAL (Returned)

Whether the extension is present in the NDF.

STATUS = INTEGER (Given and Returned)

The global status.