HP MLIB User's Guide Vol. 1 7th Ed.

220 HP MLIB User’s Guide
SGECPY/DGECPY/CGECPY/ZGECPY Copy general matrix
CHARACTER*1 trans
INTEGER*8 m, n, lda, ldb
COMPLEX*8 a(lda, *), b(ldb, *)
CALL CGECPY(trans, m, n, a, lda, b, ldb)
CHARACTER*1 trans
INTEGER*8 m, n, lda, ldb
COMPLEX*16 a(lda, *), b(ldb, *)
CALL ZGECPY(trans, m, n, a, lda, b, ldb)
Input trans Transposition option:
trans = ’N’ or ’n’ Copy A to B
trans = ’T’ or ’t’ Copy A
T
to B
trans = ’C’ or ’c’ Copy A
*
to B
In the real subprograms, ’C’ and ’c’ have the same
meaning as ’T’ and ’t’.
m Number of rows in matrix A, m ≥ 0. If m = 0, the
subprograms do not reference a or b.
n Number of columns in matrix A, n ≥ 0. If n = 0, the
subprograms do not reference a or b.
a Array containing the m-by-n matrix A.
lda The leading dimension of array a as declared in the
calling program unit, with lda ≥ max ( m,1).
b Array containing the matrix B, whose size is indicated
by trans:
trans = ’N’ or ’n’ B is an m-by-n matrix
otherwise B is an n-by-m matrix
ldb The leading dimension of array b as declared in the
calling program unit, with ldb ≥ max (the number of
rows of B,1).
Output c The updated C matrix replaces the input.
Notes If an error in the arguments is detected, the subprograms call error handler
XERBLA, which writes an error message onto the standard error file and
terminates execution. The standard version of XERBLA (see xerbla(3m)) can be
replaced with a user-supplied version to change the error procedure. Error
conditions are
trans ≠ ’N’ or ’n’ or ’T’ or ’t’ or ’C’ or ’c’
m < 0