Subroutine */
| 9172 | } /* clacpy_ */ |
| 9173 | |
| 9174 | /* Subroutine */ int clacrm_(integer *m, integer *n, complex *a, integer *lda, |
| 9175 | real *b, integer *ldb, complex *c__, integer *ldc, real *rwork) |
| 9176 | { |
| 9177 | /* System generated locals */ |
| 9178 | integer b_dim1, b_offset, a_dim1, a_offset, c_dim1, c_offset, i__1, i__2, |
| 9179 | i__3, i__4, i__5; |
| 9180 | real r__1; |
| 9181 | complex q__1; |
| 9182 | |
| 9183 | /* Local variables */ |
| 9184 | static integer i__, j, l; |
| 9185 | extern /* Subroutine */ int sgemm_(char *, char *, integer *, integer *, |
| 9186 | integer *, real *, real *, integer *, real *, integer *, real *, |
| 9187 | real *, integer *); |
| 9188 | |
| 9189 | |
| 9190 | /* |
| 9191 | -- LAPACK auxiliary routine (version 3.2) -- |
| 9192 | -- LAPACK is a software package provided by Univ. of Tennessee, -- |
| 9193 | -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- |
| 9194 | November 2006 |
| 9195 | |
| 9196 | |
| 9197 | Purpose |
| 9198 | ======= |
| 9199 | |
| 9200 | CLACRM performs a very simple matrix-matrix multiplication: |
| 9201 | C := A * B, |
| 9202 | where A is M by N and complex; B is N by N and real; |
| 9203 | C is M by N and complex. |
| 9204 | |
| 9205 | Arguments |
| 9206 | ========= |
| 9207 | |
| 9208 | M (input) INTEGER |
| 9209 | The number of rows of the matrix A and of the matrix C. |
| 9210 | M >= 0. |
| 9211 | |
| 9212 | N (input) INTEGER |
| 9213 | The number of columns and rows of the matrix B and |
| 9214 | the number of columns of the matrix C. |
| 9215 | N >= 0. |
| 9216 | |
| 9217 | A (input) COMPLEX array, dimension (LDA, N) |
| 9218 | A contains the M by N matrix A. |
| 9219 | |
| 9220 | LDA (input) INTEGER |
| 9221 | The leading dimension of the array A. LDA >=max(1,M). |
| 9222 | |
| 9223 | B (input) REAL array, dimension (LDB, N) |
| 9224 | B contains the N by N matrix B. |
| 9225 | |
| 9226 | LDB (input) INTEGER |
| 9227 | The leading dimension of the array B. LDB >=max(1,N). |
| 9228 | |
| 9229 | C (input) COMPLEX array, dimension (LDC, N) |
| 9230 | C contains the M by N matrix C. |
| 9231 |