CMP_SIZE - Enquire component size

Description:

Enquire the size of a component. For an array this will be the product of the dimensions; for a scalar, a value of 1 is returned.

Invocation:

CALL CMP_SIZE( LOC, NAME, SIZE, STATUS )

Arguments:

LOC = CHARACTER * ( DAT__SZLOC ) (Given)

Structure locator.

NAME = CHARACTER * ( DAT__SZNAM ) (Given)

Component name.

SIZE = INTEGER (Returned)

Component size.

STATUS = INTEGER (Given and Returned)

The global status.