Lines Matching refs:x0i
489 double x0r, x0i, x1r, x1i, x2r, x2i, x3r, x3i; in M_cftfsub() local
506 x0i = a[j + 1] + a[j1 + 1]; in M_cftfsub()
514 a[j + 1] = x0i + x2i; in M_cftfsub()
516 a[j2 + 1] = x0i - x2i; in M_cftfsub()
526 x0i = a[j + 1] - a[j1 + 1]; in M_cftfsub()
530 a[j1 + 1] = x0i; in M_cftfsub()
540 double x0r, x0i, x1r, x1i, x2r, x2i, x3r, x3i; in M_cftbsub() local
557 x0i = -a[j + 1] - a[j1 + 1]; in M_cftbsub()
565 a[j + 1] = x0i - x2i; in M_cftbsub()
567 a[j2 + 1] = x0i + x2i; in M_cftbsub()
577 x0i = -a[j + 1] + a[j1 + 1]; in M_cftbsub()
581 a[j1 + 1] = x0i; in M_cftbsub()
592 double x0r, x0i, x1r, x1i, x2r, x2i, x3r, x3i; in M_cft1st() local
595 x0i = a[1] + a[3]; in M_cft1st()
603 a[1] = x0i + x2i; in M_cft1st()
605 a[5] = x0i - x2i; in M_cft1st()
612 x0i = a[9] + a[11]; in M_cft1st()
620 a[9] = x0i + x2i; in M_cft1st()
621 a[12] = x2i - x0i; in M_cft1st()
624 x0i = x1i + x3r; in M_cft1st()
625 a[10] = wn4r * (x0r - x0i); in M_cft1st()
626 a[11] = wn4r * (x0r + x0i); in M_cft1st()
628 x0i = x3r - x1i; in M_cft1st()
629 a[14] = wn4r * (x0i - x0r); in M_cft1st()
630 a[15] = wn4r * (x0i + x0r); in M_cft1st()
642 x0i = a[j + 1] + a[j + 3]; in M_cft1st()
650 a[j + 1] = x0i + x2i; in M_cft1st()
652 x0i -= x2i; in M_cft1st()
653 a[j + 4] = wk2r * x0r - wk2i * x0i; in M_cft1st()
654 a[j + 5] = wk2r * x0i + wk2i * x0r; in M_cft1st()
656 x0i = x1i + x3r; in M_cft1st()
657 a[j + 2] = wk1r * x0r - wk1i * x0i; in M_cft1st()
658 a[j + 3] = wk1r * x0i + wk1i * x0r; in M_cft1st()
660 x0i = x1i - x3r; in M_cft1st()
661 a[j + 6] = wk3r * x0r - wk3i * x0i; in M_cft1st()
662 a[j + 7] = wk3r * x0i + wk3i * x0r; in M_cft1st()
669 x0i = a[j + 9] + a[j + 11]; in M_cft1st()
677 a[j + 9] = x0i + x2i; in M_cft1st()
679 x0i -= x2i; in M_cft1st()
680 a[j + 12] = -wk2i * x0r - wk2r * x0i; in M_cft1st()
681 a[j + 13] = -wk2i * x0i + wk2r * x0r; in M_cft1st()
683 x0i = x1i + x3r; in M_cft1st()
684 a[j + 10] = wk1r * x0r - wk1i * x0i; in M_cft1st()
685 a[j + 11] = wk1r * x0i + wk1i * x0r; in M_cft1st()
687 x0i = x1i - x3r; in M_cft1st()
688 a[j + 14] = wk3r * x0r - wk3i * x0i; in M_cft1st()
689 a[j + 15] = wk3r * x0i + wk3i * x0r; in M_cft1st()
699 double x0r, x0i, x1r, x1i, x2r, x2i, x3r, x3i; in M_cftmdl() local
707 x0i = a[j + 1] + a[j1 + 1]; in M_cftmdl()
715 a[j + 1] = x0i + x2i; in M_cftmdl()
717 a[j2 + 1] = x0i - x2i; in M_cftmdl()
729 x0i = a[j + 1] + a[j1 + 1]; in M_cftmdl()
737 a[j + 1] = x0i + x2i; in M_cftmdl()
738 a[j2] = x2i - x0i; in M_cftmdl()
741 x0i = x1i + x3r; in M_cftmdl()
742 a[j1] = wn4r * (x0r - x0i); in M_cftmdl()
743 a[j1 + 1] = wn4r * (x0r + x0i); in M_cftmdl()
745 x0i = x3r - x1i; in M_cftmdl()
746 a[j3] = wn4r * (x0i - x0r); in M_cftmdl()
747 a[j3 + 1] = wn4r * (x0i + x0r); in M_cftmdl()
765 x0i = a[j + 1] + a[j1 + 1]; in M_cftmdl()
773 a[j + 1] = x0i + x2i; in M_cftmdl()
775 x0i -= x2i; in M_cftmdl()
776 a[j2] = wk2r * x0r - wk2i * x0i; in M_cftmdl()
777 a[j2 + 1] = wk2r * x0i + wk2i * x0r; in M_cftmdl()
779 x0i = x1i + x3r; in M_cftmdl()
780 a[j1] = wk1r * x0r - wk1i * x0i; in M_cftmdl()
781 a[j1 + 1] = wk1r * x0i + wk1i * x0r; in M_cftmdl()
783 x0i = x1i - x3r; in M_cftmdl()
784 a[j3] = wk3r * x0r - wk3i * x0i; in M_cftmdl()
785 a[j3 + 1] = wk3r * x0i + wk3i * x0r; in M_cftmdl()
797 x0i = a[j + 1] + a[j1 + 1]; in M_cftmdl()
805 a[j + 1] = x0i + x2i; in M_cftmdl()
807 x0i -= x2i; in M_cftmdl()
808 a[j2] = -wk2i * x0r - wk2r * x0i; in M_cftmdl()
809 a[j2 + 1] = -wk2i * x0i + wk2r * x0r; in M_cftmdl()
811 x0i = x1i + x3r; in M_cftmdl()
812 a[j1] = wk1r * x0r - wk1i * x0i; in M_cftmdl()
813 a[j1 + 1] = wk1r * x0i + wk1i * x0r; in M_cftmdl()
815 x0i = x1i - x3r; in M_cftmdl()
816 a[j3] = wk3r * x0r - wk3i * x0i; in M_cftmdl()
817 a[j3 + 1] = wk3r * x0i + wk3i * x0r; in M_cftmdl()