| /dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
| H A D | zlagtm.c | 256 z__1.r = z__2.r + z__4.r; in zlagtm_()
419 d_cnjg(&z__4, &d__[1]); in zlagtm_()
421 z__3.r = z__4.r * x[i__4].r - z__4.i * x[i__4].i; in zlagtm_()
422 z__3.i = z__4.r * x[i__4].i + z__4.i * x[i__4].r; // , expr subst in zlagtm_()
437 z__3.r = z__4.r * x[i__4].r - z__4.i * x[i__4].i; in zlagtm_()
438 z__3.i = z__4.r * x[i__4].i + z__4.i * x[i__4].r; // , expr subst in zlagtm_()
680 d_cnjg(&z__4, &d__[1]); in zlagtm_()
682 z__3.r = z__4.r * x[i__4].r - z__4.i * x[i__4].i; in zlagtm_()
683 z__3.i = z__4.r * x[i__4].i + z__4.i * x[i__4].r; // , expr subst in zlagtm_()
698 z__3.r = z__4.r * x[i__4].r - z__4.i * x[i__4].i; in zlagtm_()
[all …]
|
| H A D | zlaqr1.c | 160 z__4.r = h__[i__2].r - s1->r; in zlaqr1_()
167 z__3.r = z__4.r * z__5.r - z__4.i * z__5.i; in zlaqr1_()
168 z__3.i = z__4.r * z__5.i + z__4.i * z__5.r; // , expr subst in zlaqr1_()
177 z__3.r = z__4.r - s1->r; in zlaqr1_()
219 z__4.r = h__[i__1].r - s1->r; in zlaqr1_()
226 z__3.r = z__4.r * z__5.r - z__4.i * z__5.i; in zlaqr1_()
227 z__3.i = z__4.r * z__5.i + z__4.i * z__5.r; // , expr subst in zlaqr1_()
244 z__4.r = z__5.r - s1->r; in zlaqr1_()
246 z__3.r = z__4.r - s2->r; in zlaqr1_()
261 z__4.r = z__5.r - s1->r; in zlaqr1_()
[all …]
|
| H A D | zlaic1.c | 198 d_cnjg(&z__4, s); in zlaic1_()
199 z__3.r = s->r * z__4.r - s->i * z__4.i; in zlaic1_()
200 z__3.i = s->r * z__4.i + s->i * z__4.r; // , expr subst in zlaic1_()
330 d_cnjg(&z__4, &sine); in zlaic1_()
331 z__3.r = sine.r * z__4.r - sine.i * z__4.i; in zlaic1_()
332 z__3.i = sine.r * z__4.i + sine.i * z__4.r; // , expr subst in zlaic1_()
385 d_cnjg(&z__4, s); in zlaic1_()
386 z__3.r = s->r * z__4.r - s->i * z__4.i; in zlaic1_()
387 z__3.i = s->r * z__4.i + s->i * z__4.r; // , expr subst in zlaic1_()
564 z__3.r = sine.r * z__4.r - sine.i * z__4.i; in zlaic1_()
[all …]
|
| H A D | zlags2.c | 222 z__4.r = snl * d1.r; in zlags2_()
233 z__4.r = snr * d1.r; in zlags2_()
297 d_cnjg(&z__4, &d1); in zlags2_()
298 z__3.r = -z__4.r; in zlags2_()
307 z__4.r = -z__5.r; in zlags2_()
318 d_cnjg(&z__4, &d1); in zlags2_()
319 z__3.r = -z__4.r; in zlags2_()
328 z__4.r = -z__5.r; in zlags2_()
419 z__4.r = -d1.r; in zlags2_()
432 z__4.r = -d1.r; in zlags2_()
[all …]
|
| H A D | zrot.c | 96 doublecomplex z__1, z__2, z__3, z__4; in zrot_() local
158 d_cnjg(&z__4, s); in zrot_()
160 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i; in zrot_()
161 z__3.i = z__4.r * cx[i__4].i + z__4.i * cx[i__4].r; // , expr subst in zrot_()
195 d_cnjg(&z__4, s); in zrot_()
197 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i; in zrot_()
198 z__3.i = z__4.r * cx[i__4].i + z__4.i * cx[i__4].r; // , expr subst in zrot_()
|
| H A D | zhptrd.c | 157 doublecomplex z__1, z__2, z__3, z__4; in zhptrd_() local
253 zdotc_f2c_(&z__4, &i__, &tau[1], &c__1, &ap[i1], &c__1); in zhptrd_()
254 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i; in zhptrd_()
255 z__1.i = z__2.r * z__4.i + z__2.i * z__4.r; // , expr subst in zhptrd_()
318 zdotc_f2c_(&z__4, &i__2, &tau[i__], &c__1, &ap[ii + 1], &c__1); in zhptrd_()
319 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i; in zhptrd_()
320 z__1.i = z__2.r * z__4.i + z__2.i * z__4.r; // , expr subst in zhptrd_()
|
| H A D | zlapll.c | 94 doublecomplex z__1, z__2, z__3, z__4; in zlapll_() local
146 zdotc_f2c_(&z__4, n, &x[1], incx, &y[1], incy); in zlapll_()
147 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i; in zlapll_()
148 z__1.i = z__2.r * z__4.i + z__2.i * z__4.r; // , expr subst in zlapll_()
|
| H A D | zgtts2.c | 234 z__3.r = b[i__2].r - z__4.r; in zgtts2_()
329 z__3.r = b[i__3].r - z__4.r; in zgtts2_()
381 z__3.r = b[i__3].r - z__4.r; in zgtts2_()
474 z__3.r = b[i__4].r - z__4.r; in zgtts2_()
545 d_cnjg(&z__4, &du[1]); in zgtts2_()
547 z__3.r = z__4.r * b[i__3].r - z__4.i * b[i__3].i; in zgtts2_()
548 z__3.i = z__4.r * b[i__3].i + z__4.i * b[i__3].r; // , expr subst in zgtts2_()
567 z__3.r = b[i__3].r - z__4.r; in zgtts2_()
642 d_cnjg(&z__4, &du[1]); in zgtts2_()
644 z__3.r = z__4.r * b[i__4].r - z__4.i * b[i__4].i; in zgtts2_()
[all …]
|
| H A D | zlartv.c | 100 doublecomplex z__1, z__2, z__3, z__4; in zlartv_() local
155 d_cnjg(&z__4, &s[ic]); in zlartv_()
156 z__3.r = z__4.r * xi.r - z__4.i * xi.i; in zlartv_()
157 z__3.i = z__4.r * xi.i + z__4.i * xi.r; // , expr subst in zlartv_()
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
| H A D | zlagtm.c | 177 z__1.r = z__2.r + z__4.r, z__1.i = z__2.i + z__4.i; in zlagtm_()
204 z__4.i; in zlagtm_()
277 z__4.i; in zlagtm_()
317 z__4.r * x[i__4].i + z__4.i * x[i__4].r; in zlagtm_()
330 z__4.r * x[i__4].i + z__4.i * x[i__4].r; in zlagtm_()
348 z__4.i; in zlagtm_()
423 z__4.i; in zlagtm_()
496 z__4.i; in zlagtm_()
536 z__4.r * x[i__4].i + z__4.i * x[i__4].r; in zlagtm_()
549 z__4.r * x[i__4].i + z__4.i * x[i__4].r; in zlagtm_()
[all …]
|
| H A D | zlaic1.c | 153 d_cnjg(&z__4, s); in zlaic1_()
154 z__3.r = s->r * z__4.r - s->i * z__4.i, z__3.i = s->r * in zlaic1_()
155 z__4.i + s->i * z__4.r; in zlaic1_()
227 z__4.r = d__1 + c__->r, z__4.i = c__->i; in zlaic1_()
250 z__3.r = sine.r * z__4.r - sine.i * z__4.i, z__3.i = sine.r * in zlaic1_()
251 z__4.i + sine.i * z__4.r; in zlaic1_()
292 z__3.r = s->r * z__4.r - s->i * z__4.i, z__3.i = s->r * z__4.i + in zlaic1_()
331 z__3.r = z__4.r / s2, z__3.i = z__4.i / s2; in zlaic1_()
344 z__3.r = z__4.r / s1, z__3.i = z__4.i / s1; in zlaic1_()
402 z__3.r = b + z__4.r, z__3.i = z__4.i; in zlaic1_()
[all …]
|
| H A D | zlags2.c | 166 z__4.r = snl * d1.r, z__4.i = snl * d1.i; in zlags2_()
167 z__3.r = *a3 * z__4.r, z__3.i = *a3 * z__4.i; in zlags2_()
173 z__4.r = snr * d1.r, z__4.i = snr * d1.i; in zlags2_()
174 z__3.r = *b3 * z__4.r, z__3.i = *b3 * z__4.i; in zlags2_()
227 z__3.r = -z__4.r, z__3.i = -z__4.i; in zlags2_()
232 z__4.r = -z__5.r, z__4.i = -z__5.i; in zlags2_()
233 z__3.r = snl * z__4.r, z__3.i = snl * z__4.i; in zlags2_()
241 z__3.r = -z__4.r, z__3.i = -z__4.i; in zlags2_()
246 z__4.r = -z__5.r, z__4.i = -z__5.i; in zlags2_()
336 z__4.r = -d1.r, z__4.i = -d1.i; in zlags2_()
[all …]
|
| H A D | zrot.c | 13 doublecomplex z__1, z__2, z__3, z__4; in zrot_() local
108 d_cnjg(&z__4, s); in zrot_()
110 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i, z__3.i = z__4.r * in zrot_()
111 cx[i__4].i + z__4.i * cx[i__4].r; in zrot_()
137 d_cnjg(&z__4, s); in zrot_()
139 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i, z__3.i = z__4.r * in zrot_()
140 cx[i__4].i + z__4.i * cx[i__4].r; in zrot_()
|
| H A D | zhptrd.c | 20 doublecomplex z__1, z__2, z__3, z__4; in zhptrd_() local
210 zdotc_(&z__4, &i__, &tau[1], &c__1, &ap[i1], &c__1); in zhptrd_()
211 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i, z__1.i = z__2.r * in zhptrd_()
212 z__4.i + z__2.i * z__4.r; in zhptrd_()
277 zdotc_(&z__4, &i__2, &tau[i__], &c__1, &ap[ii + 1], &c__1); in zhptrd_()
278 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i, z__1.i = z__2.r * in zhptrd_()
279 z__4.i + z__2.i * z__4.r; in zhptrd_()
|
| H A D | zlapll.c | 14 doublecomplex z__1, z__2, z__3, z__4; in zlapll_() local
112 zdotc_(&z__4, n, &x[1], incx, &y[1], incy); in zlapll_()
113 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i, z__1.i = z__2.r * z__4.i + in zlapll_()
114 z__2.i * z__4.r; in zlapll_()
|
| H A D | zgtts2.c | 177 z__3.r = b[i__2].r - z__4.r, z__3.i = b[i__2].i - z__4.i; in zgtts2_()
254 z__3.r = b[i__3].r - z__4.r, z__3.i = b[i__3].i - z__4.i; in zgtts2_()
300 z__3.r = b[i__3].r - z__4.r, z__3.i = b[i__3].i - z__4.i; in zgtts2_()
374 z__3.r = b[i__4].r - z__4.r, z__3.i = b[i__4].i - z__4.i; in zgtts2_()
439 z__3.r = z__4.r * b[i__3].r - z__4.i * b[i__3].i, z__3.i = in zgtts2_()
440 z__4.r * b[i__3].i + z__4.i * b[i__3].r; in zgtts2_()
452 z__4.r = z__5.r * b[i__4].r - z__5.i * b[i__4].i, z__4.i = in zgtts2_()
454 z__3.r = b[i__3].r - z__4.r, z__3.i = b[i__3].i - z__4.i; in zgtts2_()
512 z__3.r = z__4.r * b[i__4].r - z__4.i * b[i__4].i, z__3.i = in zgtts2_()
513 z__4.r * b[i__4].i + z__4.i * b[i__4].r; in zgtts2_()
[all …]
|
| H A D | zlartv.c | 14 doublecomplex z__1, z__2, z__3, z__4; in zlartv_() local
105 d_cnjg(&z__4, &s[ic]); in zlartv_()
106 z__3.r = z__4.r * xi.r - z__4.i * xi.i, z__3.i = z__4.r * xi.i + in zlartv_()
107 z__4.i * xi.r; in zlartv_()
|
| /dports/math/geogram/geogram-1.7.7/src/lib/third_party/numerics/CBLAS/ |
| H A D | zher2k.c | 516 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
517 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
530 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
531 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
545 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
546 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
606 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
607 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
620 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
621 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
[all …]
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/blas/ |
| H A D | zher2k.c | 510 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
511 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
524 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
525 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
539 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
540 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
600 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
601 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
614 z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, in zher2k_()
615 z__3.i = z__4.r * temp2.i + z__4.i * in zher2k_()
[all …]
|
| /dports/math/libflame/libflame-5.2.0/src/flablas/f2c/ |
| H A D | zher2k.c | 9 doublecomplex z__1, z__2, z__3, z__4, z__5, z__6; in zher2k_() local
373 z__1.r = z__2.r + z__4.r, z__1.i = z__2.i + z__4.i; in zher2k_()
464 z__1.r = z__2.r + z__4.r, z__1.i = z__2.i + z__4.i; in zher2k_()
526 … z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, z__3.i = z__4.r * temp2.i + z__4.i * temp2.r; in zher2k_()
537 … z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, z__3.i = z__4.r * temp2.i + z__4.i * temp2.r; in zher2k_()
550 … z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, z__3.i = z__4.r * temp2.i + z__4.i * temp2.r; in zher2k_()
560 z__2.r = z__3.r + z__4.r, z__2.i = z__3.i + z__4.i; in zher2k_()
610 … z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, z__3.i = z__4.r * temp2.i + z__4.i * temp2.r; in zher2k_()
621 … z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, z__3.i = z__4.r * temp2.i + z__4.i * temp2.r; in zher2k_()
634 … z__3.r = z__4.r * temp2.r - z__4.i * temp2.i, z__3.i = z__4.r * temp2.i + z__4.i * temp2.r; in zher2k_()
[all …]
|
| /dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/complex16/ |
| H A D | zrot.c | 24 doublecomplex z__1, z__2, z__3, z__4; in zrot_() local
135 d_cnjg(&z__4, s); in zrot_()
137 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i, z__3.i = z__4.r * in zrot_()
138 cx[i__4].i + z__4.i * cx[i__4].r; in zrot_()
173 d_cnjg(&z__4, s); in zrot_()
175 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i, z__3.i = z__4.r * in zrot_()
176 cx[i__4].i + z__4.i * cx[i__4].r; in zrot_()
|
| /dports/math/geogram/geogram-1.7.7/src/lib/third_party/numerics/CLAPACK/ |
| H A D | zrot.c | 21 doublecomplex z__1, z__2, z__3, z__4; in zrot_() local
115 d_cnjg(&z__4, s); in zrot_()
117 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i, z__3.i = z__4.r * in zrot_()
118 cx[i__4].i + z__4.i * cx[i__4].r; in zrot_()
144 d_cnjg(&z__4, s); in zrot_()
146 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i, z__3.i = z__4.r * in zrot_()
147 cx[i__4].i + z__4.i * cx[i__4].r; in zrot_()
|
| /dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/complex16/ |
| H A D | zrot.c | 24 doublecomplex z__1, z__2, z__3, z__4; in zrot_() local
135 d_cnjg(&z__4, s); in zrot_()
137 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i, z__3.i = z__4.r * in zrot_()
138 cx[i__4].i + z__4.i * cx[i__4].r; in zrot_()
173 d_cnjg(&z__4, s); in zrot_()
175 z__3.r = z__4.r * cx[i__4].r - z__4.i * cx[i__4].i, z__3.i = z__4.r * in zrot_()
176 cx[i__4].i + z__4.i * cx[i__4].r; in zrot_()
|
| /dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/superlu/SuperLU_4.1/TESTING/MATGEN/ |
| H A D | zlagsy.c | 23 doublecomplex z__1, z__2, z__3, z__4; in zlagsy_() local
197 zdotc_(&z__4, &i__1, &work[1], &c__1, &work[*n + 1], &c__1); in zlagsy_()
198 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i, z__1.i = z__2.r * z__4.i in zlagsy_()
199 + z__2.i * z__4.r; in zlagsy_()
224 z__4.r = work[i__7].r * work[i__8].r - work[i__7].i * work[ in zlagsy_()
225 i__8].i, z__4.i = work[i__7].r * work[i__8].i + work[ in zlagsy_()
227 z__1.r = z__2.r - z__4.r, z__1.i = z__2.i - z__4.i; in zlagsy_()
298 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i, z__1.i = z__2.r * z__4.i in zlagsy_()
299 + z__2.i * z__4.r; in zlagsy_()
326 z__4.i = work[i__8].r * a[i__9].i + work[i__8].i * a[ in zlagsy_()
[all …]
|
| /dports/math/superlu/superlu-5.2.2/TESTING/MATGEN/ |
| H A D | zlagsy.c | 23 doublecomplex z__1, z__2, z__3, z__4; in zlagsy_slu() local
197 zdotc_(&z__4, &i__1, &work[1], &c__1, &work[*n + 1], &c__1); in zlagsy_slu()
198 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i, z__1.i = z__2.r * z__4.i in zlagsy_slu()
199 + z__2.i * z__4.r; in zlagsy_slu()
224 z__4.r = work[i__7].r * work[i__8].r - work[i__7].i * work[ in zlagsy_slu()
225 i__8].i, z__4.i = work[i__7].r * work[i__8].i + work[ in zlagsy_slu()
227 z__1.r = z__2.r - z__4.r, z__1.i = z__2.i - z__4.i; in zlagsy_slu()
298 z__1.r = z__2.r * z__4.r - z__2.i * z__4.i, z__1.i = z__2.r * z__4.i in zlagsy_slu()
299 + z__2.i * z__4.r; in zlagsy_slu()
326 z__4.i = work[i__8].r * a[i__9].i + work[i__8].i * a[ in zlagsy_slu()
[all …]
|