HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11634
Case 2 If MOLD is array valued and SIZE is absent, the result is array valued and of
rank one. Its size is as small as possible such that its physical
representation is not shorter than that of SOURCE.
Case 3 If SIZE is present, the result is array valued of rank one and size SIZE.
Result value
If the physical representation of the result has the same length as that of SOURCE, the physical
representation of the result is that of SOURCE.
• If the physical representation of the result is longer than that of SOURCE, the physical
representation of the leading part is that of SOURCE and the remainder is undefined.
• If the physical representation of the result is shorter than that of SOURCE, the physical
representation of the result is the leading part of SOURCE. If D and E are scalar variables
such that the physical representation of D is as long as or longer than that of E, the value
of TRANSFER(TRANSFER(E, D), E) must be the value of E.
•IfD is an array and E is an array of rank one, the value of TRANSFER(TRANSFER(E, D), E,
SIZE(E)) must be the value of E.
TRANSPOSE(MATRIX)
Description
Transpose an array of rank two.
Class
Transformational function.
Result type,
type parameters,
and shape
MATRIX may be of any type and must have rank two.
The result is an array of the same type and type parameters as MATRIX and with rank two and
shape (n, m) where (m, n) is the shape of MATRIX.
Result value
Element (i, j) of the result has the value MATRIX( j, i ), i = 1, 2, ..., n ; j = 1, 2, ..., m .