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

358 HP MLIB User’s Guide
F_SGE_COPY/F_DGE_COPY/F_CGE_COPY/F_ZGE_COPY Matrix copy
Name F_SGE_COPY/F_DGE_COPY/F_CGE_COPY/F_ZGE_COPY
Matrix copy
Purpose F_xGE_COPY copies an m-by-n matrix A, its transpose A
T
, or its conjugate
transpose A*, and stores the result in a matrix B.
, or
Matrices A and B have the same storage format.
Refer to “SGECPY/DGECPY/CGECPY/ZGECPY” on page 219 for a description
of the equivalent HP MLIB legacy BLAS subprograms.
Usage VECLIB
INTEGER-4 LDA, LDB, M, N, TRANS
REAL*4 A( LDA, * ), B( LDB, * )
SUBROUTINE F_SGE_COPY(TRANS, M, N, A, LDA, B, LDB)
INTEGER*4 LDA, LDB, M, N, TRANS
REAL*8 A( LDA, * ), B( LDB, * )
SUBROUTINE F_DGE_COPY(TRANS, M, N, A, LDA, B, LDB)
INTEGER*4 LDA, LDB, M, N, TRANS
COMPLEX*8 A( LDA, * ), B( LDB, * )
SUBROUTINE F_CGE_COPY(TRANS, M, N, A, LDA, B, LDB)
INTEGER*4 LDA, LDB, M, N, TRANS
COMPLEX*16 A( LDA, * ), B( LDB, * )
SUBROUTINE F_ZGE_COPY(TRANS, M, N, A, LDA, B, LDB)
VECLIB8
INTEGER*8 LDA, LDB, M, N, TRANS
REAL*4 A( LDA, * ), B( LDB, * )
SUBROUTINE F_SGE_COPY(TRANS, M, N, A, LDA, B, LDB)
INTEGER*8 LDA, LDB, M, N, TRANS
REAL*8 A( LDA, * ), B( LDB, * )
SUBROUTINE F_DGE_COPY(TRANS, M, N, A, LDA, B, LDB)
INTEGER*8 LDA, LDB, M, N, TRANS
COMPLEX*8 A( LDA, * ), B( LDB, * )
SUBROUTINE F_CGE_COPY(TRANS, M, N, A, LDA, B, LDB)
INTEGER*8 LDA, LDB, M, N, TRANS
COMPLEX*16 A( LDA, * ), B( LDB, * )
SUBROUTINE F_ZGE_COPY(TRANS, M, N, A, LDA, B, LDB)
BA←
BA
T
←
BA
∗
←