- ←Prev
- KAPLIBS – Internal subroutines used within the KAPPA package.
- Next→
- TOC ↑
Description:
This routine shifts the origin to the default of one of each dimension of an NDF greater
than a nominated dimension and whose size is one.
The routine is required in applications that require NDFs of a specific dimensionality and which also
call NDF_SECT. This is because a user-defined section may be from an NDF of higher
dimensionality, and a subsequent call to NDF_SECT can result in an array of bad data,
when the bounds of higher dimensions are not one. It is intended to be used alongside
KPG1_SGDIM.
Invocation
CALL KPG1_SECSH( NDF, MXDIM, STATUS )
Arguments
NDF =
INTEGER (Given)
The NDF identifier.
MXDIM = INTEGER (Given)
The dimension above
which the shifts are to be made. This should be the last significant bound for the required
dimensionality of NDF.
STATUS = INTEGER (Given and Returned)
The global status.
- ←Prev
- KAPLIBS – Internal subroutines used within the KAPPA package.
- Next→
- TOC ↑