Description:
Enquire if a structure component is a primitive
object.
Invocation
CALL CMP_PRIM( LOC, NAME, REPLY, STATUS )
Arguments
LOC = CHARACTER
(
DAT__SZLOC ) (Given)
NAME = CHARACTER
(
DAT__SZNAM ) (Given)
REPLY = LOGICAL (Returned)
.TRUE. if
primitive, otherwise .FALSE..
STATUS = INTEGER (Given and Returned)
The global status.
Copyright © 2019 East Asian Observatory