/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
H A D | zlabrd.c | 209 zlacgv_(&i__2, &y[i__ + y_dim1], ldy); in zlabrd_() 217 zlacgv_(&i__2, &y[i__ + y_dim1], ldy); in zlabrd_() 277 zlacgv_(&i__, &a[i__ + a_dim1], lda); in zlabrd_() 283 zlacgv_(&i__, &a[i__ + a_dim1], lda); in zlabrd_() 285 zlacgv_(&i__2, &x[i__ + x_dim1], ldx); in zlabrd_() 293 zlacgv_(&i__2, &x[i__ + x_dim1], ldx); in zlabrd_() 356 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlabrd_() 364 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlabrd_() 366 zlacgv_(&i__2, &x[i__ + x_dim1], ldx); in zlabrd_() 428 zlacgv_(&i__2, &y[i__ + y_dim1], ldy); in zlabrd_() [all …]
|
H A D | zhetrs.c | 277 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 283 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 301 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 307 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 309 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhetrs_() 315 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhetrs_() 464 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 470 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 488 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 494 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() [all …]
|
H A D | zhptrs.c | 275 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 281 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 300 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 306 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 308 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhptrs_() 314 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhptrs_() 468 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 474 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 492 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 498 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() [all …]
|
H A D | zhegs2.c | 38 doublecomplex *, integer *), zlacgv_(integer *, doublecomplex *, in zhegs2_() 178 zlacgv_(&i__2, &a[k + (k + 1) * a_dim1], lda); in zhegs2_() 180 zlacgv_(&i__2, &b[k + (k + 1) * b_dim1], ldb); in zhegs2_() 193 zlacgv_(&i__2, &b[k + (k + 1) * b_dim1], ldb); in zhegs2_() 199 zlacgv_(&i__2, &a[k + (k + 1) * a_dim1], lda); in zhegs2_() 298 zlacgv_(&i__2, &a[k + a_dim1], lda); in zhegs2_() 306 zlacgv_(&i__2, &b[k + b_dim1], ldb); in zhegs2_() 315 zlacgv_(&i__2, &b[k + b_dim1], ldb); in zhegs2_() 319 zlacgv_(&i__2, &a[k + a_dim1], lda); in zhegs2_()
|
H A D | zlauu2.c | 32 integer *, doublereal *, doublecomplex *, integer *), zlacgv_( in zlauu2_() 145 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zlauu2_() 153 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zlauu2_() 176 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlauu2_() 184 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlauu2_()
|
H A D | zpotf2.c | 35 integer *, doublereal *, doublecomplex *, integer *), zlacgv_( in zpotf2_() 168 zlacgv_(&i__2, &a[j * a_dim1 + 1], &c__1); in zpotf2_() 176 zlacgv_(&i__2, &a[j * a_dim1 + 1], &c__1); in zpotf2_() 211 zlacgv_(&i__2, &a[j + a_dim1], lda); in zpotf2_() 219 zlacgv_(&i__2, &a[j + a_dim1], lda); in zpotf2_()
|
H A D | zlatrd.c | 39 integer *, doublecomplex *), zlacgv_(integer *, doublecomplex *, in zlatrd_() 221 zlacgv_(&i__2, &w[i__ + (iw + 1) * w_dim1], ldw); in zlatrd_() 228 zlacgv_(&i__2, &w[i__ + (iw + 1) * w_dim1], ldw); in zlatrd_() 230 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zlatrd_() 237 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zlatrd_() 325 zlacgv_(&i__2, &w[i__ + w_dim1], ldw); in zlatrd_() 333 zlacgv_(&i__2, &w[i__ + w_dim1], ldw); in zlatrd_() 335 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlatrd_() 343 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlatrd_()
|
H A D | zpbstf.c | 32 integer *, doublereal *, doublecomplex *, integer *), zlacgv_( in zpbstf_() 244 zlacgv_(&km, &ab[*kd + (j + 1) * ab_dim1], &kld); in zpbstf_() 247 zlacgv_(&km, &ab[*kd + (j + 1) * ab_dim1], &kld); in zpbstf_() 279 zlacgv_(&km, &ab[km + 1 + (j - km) * ab_dim1], &kld); in zpbstf_() 282 zlacgv_(&km, &ab[km + 1 + (j - km) * ab_dim1], &kld); in zpbstf_()
|
H A D | zlarzb.c | 35 zlacgv_(integer *, doublecomplex *, integer *); in zlarzb_() 264 zlacgv_(&i__2, &t[j + j * t_dim1], &c__1); in zlarzb_() 273 zlacgv_(&i__2, &t[j + j * t_dim1], &c__1); in zlarzb_() 299 zlacgv_(k, &v[j * v_dim1 + 1], &c__1); in zlarzb_() 310 zlacgv_(k, &v[j * v_dim1 + 1], &c__1); in zlarzb_()
|
H A D | zgelq2.c | 21 integer *, doublecomplex *), zlacgv_(integer *, doublecomplex *, in zgelq2_() 130 zlacgv_(&i__2, &a[i__ + i__ * a_dim1], lda); in zgelq2_() 153 zlacgv_(&i__2, &a[i__ + i__ * a_dim1], lda); in zgelq2_()
|
H A D | zgerq2.c | 21 integer *, doublecomplex *), zlacgv_(integer *, doublecomplex *, in zgerq2_() 132 zlacgv_(&i__1, &a[*m - k + i__ + a_dim1], lda); in zgerq2_() 149 zlacgv_(&i__1, &a[*m - k + i__ + a_dim1], lda); in zgerq2_()
|
H A D | zlarzt.c | 29 xerbla_(char *, integer *, ftnlen), zlacgv_(integer *, in zlarzt_() 205 zlacgv_(n, &v[i__ + v_dim1], ldv); in zlarzt_() 212 zlacgv_(n, &v[i__ + v_dim1], ldv); in zlarzt_()
|
H A D | zgebd2.c | 30 integer *, doublecomplex *), zlacgv_(integer *, doublecomplex *, in zgebd2_() 230 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zgebd2_() 251 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zgebd2_() 271 zlacgv_(&i__2, &a[i__ + i__ * a_dim1], lda); in zgebd2_() 294 zlacgv_(&i__2, &a[i__ + i__ * a_dim1], lda); in zgebd2_()
|
H A D | zlarz.c | 32 integer *, doublecomplex *, integer *), zlacgv_(integer *, in zlarz_() 137 zlacgv_(n, &work[1], &c__1); in zlarz_() 144 zlacgv_(n, &work[1], &c__1); in zlarz_()
|
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
H A D | zlabrd.c | 277 zlacgv_(&i__2, &y[i__ + y_dim1], ldy); in zlabrd_() 284 zlacgv_(&i__2, &y[i__ + y_dim1], ldy); in zlabrd_() 330 zlacgv_(&i__, &a[i__ + a_dim1], lda); in zlabrd_() 335 zlacgv_(&i__, &a[i__ + a_dim1], lda); in zlabrd_() 337 zlacgv_(&i__2, &x[i__ + x_dim1], ldx); in zlabrd_() 344 zlacgv_(&i__2, &x[i__ + x_dim1], ldx); in zlabrd_() 396 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlabrd_() 403 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlabrd_() 405 zlacgv_(&i__2, &x[i__ + x_dim1], ldx); in zlabrd_() 412 zlacgv_(&i__2, &x[i__ + x_dim1], ldx); in zlabrd_() [all …]
|
H A D | zhetrs.c | 317 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 322 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 339 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 344 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 345 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhetrs_() 350 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhetrs_() 488 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 493 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 510 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() 515 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_() [all …]
|
H A D | zhptrs.c | 310 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 315 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 333 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 338 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 339 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhptrs_() 344 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhptrs_() 488 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 493 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 510 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() 515 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhptrs_() [all …]
|
H A D | zhetrs_rook.c | 336 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_rook_() 341 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_rook_() 358 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_rook_() 363 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_rook_() 364 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhetrs_rook_() 369 zlacgv_(nrhs, &b[k + 1 + b_dim1], ldb); in zhetrs_rook_() 517 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_rook_() 522 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_rook_() 539 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_rook_() 544 zlacgv_(nrhs, &b[k + b_dim1], ldb); in zhetrs_rook_() [all …]
|
H A D | zlatrd.c | 222 …nteger *, doublecomplex *, doublecomplex *, integer *, doublecomplex *), zlacgv_(integer *, double… in zlatrd_() 276 zlacgv_(&i__2, &w[i__ + (iw + 1) * w_dim1], ldw); in zlatrd_() 282 zlacgv_(&i__2, &w[i__ + (iw + 1) * w_dim1], ldw); in zlatrd_() 284 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zlatrd_() 290 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zlatrd_() 367 zlacgv_(&i__2, &w[i__ + w_dim1], ldw); in zlatrd_() 374 zlacgv_(&i__2, &w[i__ + w_dim1], ldw); in zlatrd_() 376 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlatrd_() 383 zlacgv_(&i__2, &a[i__ + a_dim1], lda); in zlatrd_()
|
H A D | zlarzb.c | 189 …x *, integer *, doublecomplex *, integer *), xerbla_(char *, integer *), zlacgv_(integer *, double… in zlarzb_() 329 zlacgv_(&i__2, &t[j + j * t_dim1], &c__1); in zlarzb_() 339 zlacgv_(&i__2, &t[j + j * t_dim1], &c__1); in zlarzb_() 371 zlacgv_(k, &v[j * v_dim1 + 1], &c__1); in zlarzb_() 385 zlacgv_(k, &v[j * v_dim1 + 1], &c__1); in zlarzb_()
|
H A D | zpbstf.c | 166 …teger *), zdscal_( integer *, doublereal *, doublecomplex *, integer *), zlacgv_( integer *, doubl… in zpbstf_() 290 zlacgv_(&km, &ab[*kd + (j + 1) * ab_dim1], &kld); in zpbstf_() 292 zlacgv_(&km, &ab[*kd + (j + 1) * ab_dim1], &kld); in zpbstf_() 326 zlacgv_(&km, &ab[km + 1 + (j - km) * ab_dim1], &kld); in zpbstf_() 328 zlacgv_(&km, &ab[km + 1 + (j - km) * ab_dim1], &kld); in zpbstf_()
|
H A D | zgelq2.c | 120 …nteger *, doublecomplex *, doublecomplex *, integer *, doublecomplex *), zlacgv_(integer *, double… in zgelq2_() 174 zlacgv_(&i__2, &a[i__ + i__ * a_dim1], lda); in zgelq2_() 196 zlacgv_(&i__2, &a[i__ + i__ * a_dim1], lda); in zgelq2_()
|
H A D | zgerq2.c | 123 …nteger *, doublecomplex *, doublecomplex *, integer *, doublecomplex *), zlacgv_(integer *, double… in zgerq2_() 177 zlacgv_(&i__1, &a[*m - k + i__ + a_dim1], lda); in zgerq2_() 194 zlacgv_(&i__1, &a[*m - k + i__ + a_dim1], lda); in zgerq2_()
|
H A D | zlarzt.c | 193 …x *, integer *, doublecomplex *, integer *), xerbla_(char *, integer *), zlacgv_(integer *, double… in zlarzt_() 262 zlacgv_(n, &v[i__ + v_dim1], ldv); in zlarzt_() 268 zlacgv_(n, &v[i__ + v_dim1], ldv); in zlarzt_()
|
H A D | zgebd2.c | 202 …nteger *, doublecomplex *, doublecomplex *, integer *, doublecomplex *), zlacgv_(integer *, double… in zgebd2_() 289 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zgebd2_() 307 zlacgv_(&i__2, &a[i__ + (i__ + 1) * a_dim1], lda); in zgebd2_() 332 zlacgv_(&i__2, &a[i__ + i__ * a_dim1], lda); in zgebd2_() 353 zlacgv_(&i__2, &a[i__ + i__ * a_dim1], lda); in zgebd2_()
|