Description:
This routine should be used
instead of GRP_SETSZ to set the size of a group created by NDG. It sets the size of the supplied group,
and also sets the size of each of the supplemental groups associated with the supplied group.
Invocation
CALL NDG_SETSZ( IGRP, SIZE, STATUS )
Arguments
IGRP = INTEGER (Given)
The
NDG group as returned by NDG_ASSOC, etc. This should be the last group in a GRP owner-slave
chain.
SIZE = INTEGER (Given)
The new group size. Must be less than or equal to the size of the
smallest group in the chain.
STATUS = INTEGER (Given and Returned)
The global status.
Copyright © 2000 Council for the Central Laboratory of the Research Councils