HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11548
must be of the same type and type parameters as ARRAY and must be scalar
if ARRAY has rank one; otherwise, it must be either scalar or of rank n -1 and
of shape ( d
1
, d
2
, ..., d
DIM-1
, d
DIM+1
, ..., d
n
). BOUNDARY may be omitted for the
data types listed in Table 11-5, which lists the default values of BOUNDARY
for each data type.
DIM (optional) must be scalar and of type integer with a value in the range 1 <= DIM <= n ,
where n is the rank of ARRAY.IfDIM is omitted, it is as if it were present with
the value 1.
Result type,
type parameters,
and shape
The result has the type, type parameters, and shape of ARRAY.
Result value
Element ( s
1
, s
1
, ..., s
n
) of the result has the value ARRAY ( s
1
, s
2
, ..., s
DIM-1
, s
DIM
+ sh , s
DIM+1
,
..., s
n
) where sh is SHIFT or SHIFT( s
1
, s
2
, ..., s
DIM-1
, s
DIM+1
, ..., s
n
) provided the inequality
LBOUND(ARRAY, DIM) <= s
DIM
+ sh <= UBOUND(ARRAY, DIM) holds and is otherwise BOUNDARY
or BOUNDARY( s
1
, s
2
, ..., s
DIM-1
, s
DIM+1
, ..., s
n
).
Specific forms
KEOSHIFT.
Table 11-5 Default values for the BOUNDARY argument
Data type of ARRAY Default value of BOUNDARY
Integer 0
Real 0.0
Complex (0.0, 0.0)
Logical .FALSE.
Character ( len ) len blanks