HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11614
Arguments
SOURCE may be of any type. It must be array valued. If PAD is absent or of size zero,
the size of SOURCE must be greater than or equal to PRODUCT(SHAPE). The
size of the result is the product of the values of the elements of SHAPE.
SHAPE must be of type integer, rank one, and constant size. Its size must be positive
and less than 8. It must not have an element whose value is negative.
PAD (optional) must be of the same type and type parameters as SOURCE. PAD must be array
valued.
ORDER (optional) must be of type integer, must have the same shape as SHAPE, and its value
must be a permutation of [1, 2, ...,
n
], where
n
is the size of SHAPE. If absent,
it is as if it were present with value [1, 2, ...,
n
].
Result type,
type parameters,
and shape
The result is an array of shape SHAPE (that is, SHAPE(RESHAPE(SOURCE, SHAPE, PAD,
ORDER)) is equal to SHAPE) with the same type and type parameters as SOURCE.
Result value
The elements of the result, taken in permuted subscript order ORDER(1), ..., ORDER(
n
), are
those of SOURCE in normal array element order followed if necessary by those of PAD in array
element order, followed if necessary by additional copies of PAD in array element order.
Specific forms
KRESHAPE.
RNUM(I)
Description
Convert character to real type.
Class
Elemental nonstandard function.