33               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_cgemm()
42               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_cgemm()
52               B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_cgemm()
61               B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_cgemm()
70            C[i*LDC+j].imag=c[j*(*ldc)+i].imag;  in F77_cgemm()
77            c[j*(*ldc)+i].imag=C[i*LDC+j].imag;  in F77_cgemm()
110               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_chemm()
119               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_chemm()
127            B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_chemm()
134            C[i*LDC+j].imag=c[j*(*ldc)+i].imag;  in F77_chemm()
141            c[j*(*ldc)+i].imag=C[i*LDC+j].imag;  in F77_chemm()
228               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_cherk()
237               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_cherk()
245            C[i*LDC+j].imag=c[j*(*ldc)+i].imag;  in F77_cherk()
252            c[j*(*ldc)+i].imag=C[i*LDC+j].imag;  in F77_cherk()
284               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_csyrk()
293               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_csyrk()
301            C[i*LDC+j].imag=c[j*(*ldc)+i].imag;  in F77_csyrk()
308            c[j*(*ldc)+i].imag=C[i*LDC+j].imag;  in F77_csyrk()
341               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_cher2k()
343               B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_cher2k()
354               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_cher2k()
356               B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_cher2k()
364            C[i*LDC+j].imag=c[j*(*ldc)+i].imag;  in F77_cher2k()
371            c[j*(*ldc)+i].imag=C[i*LDC+j].imag;  in F77_cher2k()
405               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_csyr2k()
407               B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_csyr2k()
418               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_csyr2k()
420               B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_csyr2k()
428            C[i*LDC+j].imag=c[j*(*ldc)+i].imag;  in F77_csyr2k()
435            c[j*(*ldc)+i].imag=C[i*LDC+j].imag;  in F77_csyr2k()
470               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_ctrmm()
479               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_ctrmm()
487            B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_ctrmm()
494            b[j*(*ldb)+i].imag=B[i*LDB+j].imag;  in F77_ctrmm()
529               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_ctrsm()
538               A[i*LDA+j].imag=a[j*(*lda)+i].imag;  in F77_ctrsm()
546            B[i*LDB+j].imag=b[j*(*ldb)+i].imag;  in F77_ctrsm()
553            b[j*(*ldb)+i].imag=B[i*LDB+j].imag;  in F77_ctrsm()