Home | History | Annotate | Download | only in f2c

Lines Matching refs:z__2

21     doublecomplex z__1, z__2, z__3;
257 z__2.r = temp.r * a[i__5].r - temp.i * a[i__5].i,
258 z__2.i = temp.r * a[i__5].i + temp.i * a[
260 z__1.r = x[i__3].r + z__2.r, z__1.i = x[i__3].i +
261 z__2.i;
294 z__2.r = temp.r * a[i__5].r - temp.i * a[i__5].i,
295 z__2.i = temp.r * a[i__5].i + temp.i * a[
297 z__1.r = x[i__2].r + z__2.r, z__1.i = x[i__2].i +
298 z__2.i;
335 z__2.r = temp.r * a[i__2].r - temp.i * a[i__2].i,
336 z__2.i = temp.r * a[i__2].i + temp.i * a[
338 z__1.r = x[i__3].r + z__2.r, z__1.i = x[i__3].i +
339 z__2.i;
372 z__2.r = temp.r * a[i__2].r - temp.i * a[i__2].i,
373 z__2.i = temp.r * a[i__2].i + temp.i * a[
375 z__1.r = x[i__1].r + z__2.r, z__1.i = x[i__1].i +
376 z__2.i;
424 z__2.r = a[i__4].r * x[i__1].r - a[i__4].i * x[
425 i__1].i, z__2.i = a[i__4].r * x[i__1].i +
427 z__1.r = temp.r + z__2.r, z__1.i = temp.i +
428 z__2.i;
434 d_cnjg(&z__2, &a[kplus1 + j * a_dim1]);
435 z__1.r = temp.r * z__2.r - temp.i * z__2.i,
436 z__1.i = temp.r * z__2.i + temp.i *
437 z__2.r;
446 z__2.r = z__3.r * x[i__4].r - z__3.i * x[i__4].i,
447 z__2.i = z__3.r * x[i__4].i + z__3.i * x[
449 z__1.r = temp.r + z__2.r, z__1.i = temp.i +
450 z__2.i;
482 z__2.r = a[i__4].r * x[i__1].r - a[i__4].i * x[
483 i__1].i, z__2.i = a[i__4].r * x[i__1].i +
485 z__1.r = temp.r + z__2.r, z__1.i = temp.i +
486 z__2.i;
493 d_cnjg(&z__2, &a[kplus1 + j * a_dim1]);
494 z__1.r = temp.r * z__2.r - temp.i * z__2.i,
495 z__1.i = temp.r * z__2.i + temp.i *
496 z__2.r;
505 z__2.r = z__3.r * x[i__4].r - z__3.i * x[i__4].i,
506 z__2.i = z__3.r * x[i__4].i + z__3.i * x[
508 z__1.r = temp.r + z__2.r, z__1.i = temp.i +
509 z__2.i;
542 z__2.r = a[i__1].r * x[i__2].r - a[i__1].i * x[
543 i__2].i, z__2.i = a[i__1].r * x[i__2].i +
545 z__1.r = temp.r + z__2
546 z__2.i;
552 d_cnjg(&z__2, &a[j * a_dim1 + 1]);
553 z__1.r = temp.r * z__2.r - temp.i * z__2.i,
554 z__1.i = temp.r * z__2.i + temp.i *
555 z__2.r;
564 z__2.r = z__3.r * x[i__1].r - z__3.i * x[i__1].i,
565 z__2.i = z__3.r * x[i__1].i + z__3.i * x[
567 z__1.r = temp.r + z__2.r, z__1.i = temp.i +
568 z__2.i;
600 z__2.r = a[i__1].r * x[i__2].r - a[i__1].i * x[
601 i__2].i, z__2.i = a[i__1].r * x[i__2].i +
603 z__1.r = temp.r + z__2.r, z__1.i = temp.i +
604 z__2.i;
611 d_cnjg(&z__2, &a[j * a_dim1 + 1]);
612 z__1.r = temp.r * z__2.r - temp.i * z__2.i,
613 z__1.i = temp.r * z__2.i + temp.i *
614 z__2.r;
623 z__2.r = z__3.r * x[i__1].r - z__3.i * x[i__1].i,
624 z__2.i = z__3.r * x[i__1].i + z__3.i * x[
626 z__1.r = temp.r + z__2.r, z__1.i = temp.i +
627 z__2.i;