Lines Matching refs:j
19 int i,j,LDA, LDB, LDC; in F77_dgemm() local
30 for( j=0; j<*k; j++ ) in F77_dgemm()
31 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dgemm()
37 for( j=0; j<*m; j++ ) in F77_dgemm()
38 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dgemm()
44 for( j=0; j<*n; j++ ) in F77_dgemm()
45 B[i*LDB+j]=b[j*(*ldb)+i]; in F77_dgemm()
51 for( j=0; j<*k; j++ ) in F77_dgemm()
52 B[i*LDB+j]=b[j*(*ldb)+i]; in F77_dgemm()
56 for( j=0; j<*n; j++ ) in F77_dgemm()
58 C[i*LDC+j]=c[j*(*ldc)+i]; in F77_dgemm()
62 for( j=0; j<*n; j++ ) in F77_dgemm()
64 c[j*(*ldc)+i]=C[i*LDC+j]; in F77_dgemm()
81 int i,j,LDA, LDB, LDC; in F77_dsymm() local
93 for( j=0; j<*m; j++ ) in F77_dsymm()
94 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dsymm()
100 for( j=0; j<*n; j++ ) in F77_dsymm()
101 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dsymm()
106 for( j=0; j<*n; j++ ) in F77_dsymm()
107 B[i*LDB+j]=b[j*(*ldb)+i]; in F77_dsymm()
110 for( j=0; j<*n; j++ ) in F77_dsymm()
112 C[i*LDC+j]=c[j*(*ldc)+i]; in F77_dsymm()
115 for( j=0; j<*n; j++ ) in F77_dsymm()
117 c[j*(*ldc)+i]=C[i*LDC+j]; in F77_dsymm()
134 int i,j,LDA,LDC; in F77_dsyrk() local
147 for( j=0; j<*k; j++ ) in F77_dsyrk()
148 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dsyrk()
154 for( j=0; j<*n; j++ ) in F77_dsyrk()
155 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dsyrk()
160 for( j=0; j<*n; j++ ) in F77_dsyrk()
161 C[i*LDC+j]=c[j*(*ldc)+i]; in F77_dsyrk()
164 for( j=0; j<*n; j++ ) in F77_dsyrk()
166 c[j*(*ldc)+i]=C[i*LDC+j]; in F77_dsyrk()
181 int i,j,LDA,LDB,LDC; in F77_dsyr2k() local
196 for( j=0; j<*k; j++ ) { in F77_dsyr2k()
197 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dsyr2k()
198 B[i*LDB+j]=b[j*(*ldb)+i]; in F77_dsyr2k()
207 for( j=0; j<*n; j++ ){ in F77_dsyr2k()
208 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dsyr2k()
209 B[i*LDB+j]=b[j*(*ldb)+i]; in F77_dsyr2k()
215 for( j=0; j<*n; j++ ) in F77_dsyr2k()
216 C[i*LDC+j]=c[j*(*ldc)+i]; in F77_dsyr2k()
219 for( j=0; j<*n; j++ ) in F77_dsyr2k()
221 c[j*(*ldc)+i]=C[i*LDC+j]; in F77_dsyr2k()
236 int i,j,LDA,LDB; in F77_dtrmm() local
253 for( j=0; j<*m; j++ ) in F77_dtrmm()
254 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dtrmm()
260 for( j=0; j<*n; j++ ) in F77_dtrmm()
261 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dtrmm()
266 for( j=0; j<*n; j++ ) in F77_dtrmm()
267 B[i*LDB+j]=b[j*(*ldb)+i]; in F77_dtrmm()
270 for( j=0; j<*n; j++ ) in F77_dtrmm()
272 b[j*(*ldb)+i]=B[i*LDB+j]; in F77_dtrmm()
287 int i,j,LDA,LDB; in F77_dtrsm() local
304 for( j=0; j<*m; j++ ) in F77_dtrsm()
305 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dtrsm()
311 for( j=0; j<*n; j++ ) in F77_dtrsm()
312 A[i*LDA+j]=a[j*(*lda)+i]; in F77_dtrsm()
317 for( j=0; j<*n; j++ ) in F77_dtrsm()
318 B[i*LDB+j]=b[j*(*ldb)+i]; in F77_dtrsm()
321 for( j=0; j<*n; j++ ) in F77_dtrsm()
323 b[j*(*ldb)+i]=B[i*LDB+j]; in F77_dtrsm()