Home | History | Annotate | Download | only in f2c

Lines Matching refs:q__2

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