Ensure that a component with the specified name, type and shape exists. If a component with the required name does not exist, one is created. If a component with that name does exist but has a different type or shape, it is deleted and a new one created with the required attributes.

CALL CMP_MOD( LOC, NAME, TYPE, NDIM, DIM, STATUS )

LOC = CHARACTER $\ast$ ( DAT__SZLOC ) (Given)

NAME = CHARACTER $\ast$ ( DAT__SZNAM ) (Given)

TYPE = CHARACTER $\ast$ ( DAT__SZTYP ) (Given)

NDIM = INTEGER (Given)

DIM = INTEGER( NDIM ) (Given)

STATUS = INTEGER (Given and Returned)