HP Fortran Programmer's Reference

Intrinsic procedures
Intrinsic procedure specifications
Case 2 If MOLD is array valued and SIZE is absent, the result is array valued and of
rankone.Itssizeisassmallaspossiblesuchthatitsphysical
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, thephysical
representation of the result is that of SOURCE.
If the physical representation of the result is longer than that of SOURCE, thephysical
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, thephysical
representation of the result is the leading part of SOURCE. IfD and E are scalar variables
such that the physical representation of D is as long as or longer than that of E, thevalue
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.
TheresultisanarrayofthesametypeandtypeparametersasMATRIX 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.
Chapter 11 599