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