frc_128.c

FFTW, a collection of fast C routines to compute the Discrete Fourier Transform in one or more dime

	       fftw_real tmp427;
	       fftw_real tmp428;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp401 = tmp131 - tmp138;
	       tmp402 = tmp370 - tmp369;
	       tmp403 = tmp401 - tmp402;
	       tmp441 = tmp401 + tmp402;
	       {
		    fftw_real tmp406;
		    fftw_real tmp409;
		    fftw_real tmp430;
		    fftw_real tmp431;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp406 = (K773010453 * tmp404) + (K634393284 * tmp405);
		    tmp409 = (K773010453 * tmp407) - (K634393284 * tmp408);
		    tmp410 = tmp406 - tmp409;
		    tmp451 = tmp409 + tmp406;
		    tmp430 = tmp157 - tmp148;
		    tmp431 = tmp367 - tmp364;
		    tmp432 = tmp430 - tmp431;
		    tmp452 = tmp431 + tmp430;
	       }
	       tmp427 = (K773010453 * tmp405) - (K634393284 * tmp404);
	       tmp428 = (K634393284 * tmp407) + (K773010453 * tmp408);
	       tmp429 = tmp427 - tmp428;
	       tmp442 = tmp428 + tmp427;
	       {
		    fftw_real tmp421;
		    fftw_real tmp447;
		    fftw_real tmp424;
		    fftw_real tmp448;
		    fftw_real tmp420;
		    fftw_real tmp422;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp420 = tmp354 - tmp353;
		    tmp421 = tmp419 - tmp420;
		    tmp447 = tmp419 + tmp420;
		    tmp422 = tmp341 - tmp324;
		    tmp424 = tmp422 - tmp423;
		    tmp448 = tmp423 + tmp422;
		    tmp425 = (K903989293 * tmp421) - (K427555093 * tmp424);
		    tmp437 = (K903989293 * tmp424) + (K427555093 * tmp421);
		    tmp449 = (K941544065 * tmp447) - (K336889853 * tmp448);
		    tmp457 = (K941544065 * tmp448) + (K336889853 * tmp447);
	       }
	       {
		    fftw_real tmp414;
		    fftw_real tmp444;
		    fftw_real tmp417;
		    fftw_real tmp445;
		    fftw_real tmp412;
		    fftw_real tmp416;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp412 = tmp264 - tmp247;
		    tmp414 = tmp412 - tmp413;
		    tmp444 = tmp413 + tmp412;
		    tmp416 = tmp277 - tmp276;
		    tmp417 = tmp415 - tmp416;
		    tmp445 = tmp415 + tmp416;
		    tmp418 = (K427555093 * tmp414) + (K903989293 * tmp417);
		    tmp436 = (K903989293 * tmp414) - (K427555093 * tmp417);
		    tmp446 = (K336889853 * tmp444) + (K941544065 * tmp445);
		    tmp456 = (K941544065 * tmp444) - (K336889853 * tmp445);
	       }
	  }
	  {
	       fftw_real tmp411;
	       fftw_real tmp426;
	       fftw_real tmp433;
	       fftw_real tmp434;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp411 = tmp403 + tmp410;
	       tmp426 = tmp418 + tmp425;
	       real_output[55 * real_ostride] = tmp411 - tmp426;
	       real_output[9 * real_ostride] = tmp411 + tmp426;
	       tmp433 = tmp429 - tmp432;
	       tmp434 = tmp425 - tmp418;
	       imag_output[23 * imag_ostride] = tmp433 + tmp434;
	       imag_output[41 * imag_ostride] = tmp434 - tmp433;
	  }
	  {
	       fftw_real tmp435;
	       fftw_real tmp438;
	       fftw_real tmp439;
	       fftw_real tmp440;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp435 = tmp432 + tmp429;
	       tmp438 = tmp436 + tmp437;
	       imag_output[9 * imag_ostride] = tmp435 + tmp438;
	       imag_output[55 * imag_ostride] = tmp438 - tmp435;
	       tmp439 = tmp403 - tmp410;
	       tmp440 = tmp437 - tmp436;
	       real_output[41 * real_ostride] = tmp439 - tmp440;
	       real_output[23 * real_ostride] = tmp439 + tmp440;
	  }
	  {
	       fftw_real tmp443;
	       fftw_real tmp450;
	       fftw_real tmp453;
	       fftw_real tmp454;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp443 = tmp441 + tmp442;
	       tmp450 = tmp446 + tmp449;
	       real_output[57 * real_ostride] = tmp443 - tmp450;
	       real_output[7 * real_ostride] = tmp443 + tmp450;
	       tmp453 = tmp451 - tmp452;
	       tmp454 = tmp449 - tmp446;
	       imag_output[25 * imag_ostride] = tmp453 + tmp454;
	       imag_output[39 * imag_ostride] = tmp454 - tmp453;
	  }
	  {
	       fftw_real tmp455;
	       fftw_real tmp458;
	       fftw_real tmp459;
	       fftw_real tmp460;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp455 = tmp452 + tmp451;
	       tmp458 = tmp456 + tmp457;
	       imag_output[7 * imag_ostride] = tmp455 + tmp458;
	       imag_output[57 * imag_ostride] = tmp458 - tmp455;
	       tmp459 = tmp441 - tmp442;
	       tmp460 = tmp457 - tmp456;
	       real_output[39 * real_ostride] = tmp459 - tmp460;
	       real_output[25 * real_ostride] = tmp459 + tmp460;
	  }
     }
     {
	  fftw_real tmp629;
	  fftw_real tmp719;
	  fftw_real tmp710;
	  fftw_real tmp730;
	  fftw_real tmp636;
	  fftw_real tmp729;
	  fftw_real tmp707;
	  fftw_real tmp720;
	  fftw_real tmp670;
	  fftw_real tmp714;
	  fftw_real tmp724;
	  fftw_real tmp734;
	  fftw_real tmp703;
	  fftw_real tmp715;
	  fftw_real tmp727;
	  fftw_real tmp735;
	  fftw_real tmp628;
	  fftw_real tmp709;
	  ASSERT_ALIGNED_DOUBLE;
	  tmp628 = K707106781 * (tmp626 + tmp627);
	  tmp629 = tmp625 + tmp628;
	  tmp719 = tmp625 - tmp628;
	  tmp709 = K707106781 * (tmp627 - tmp626);
	  tmp710 = tmp708 + tmp709;
	  tmp730 = tmp709 - tmp708;
	  {
	       fftw_real tmp632;
	       fftw_real tmp635;
	       fftw_real tmp705;
	       fftw_real tmp706;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp632 = (K923879532 * tmp630) + (K382683432 * tmp631);
	       tmp635 = (K923879532 * tmp633) - (K382683432 * tmp634);
	       tmp636 = tmp632 + tmp635;
	       tmp729 = tmp635 - tmp632;
	       tmp705 = (K923879532 * tmp631) - (K382683432 * tmp630);
	       tmp706 = (K382683432 * tmp633) + (K923879532 * tmp634);
	       tmp707 = tmp705 + tmp706;
	       tmp720 = tmp706 - tmp705;
	  }
	  {
	       fftw_real tmp660;
	       fftw_real tmp669;
	       fftw_real tmp722;
	       fftw_real tmp723;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp660 = tmp644 + tmp659;
	       tmp669 = tmp667 + tmp668;
	       tmp670 = (K980785280 * tmp660) + (K195090322 * tmp669);
	       tmp714 = (K980785280 * tmp669) - (K195090322 * tmp660);
	       tmp722 = tmp644 - tmp659;
	       tmp723 = tmp668 - tmp667;
	       tmp724 = (K831469612 * tmp722) + (K555570233 * tmp723);
	       tmp734 = (K831469612 * tmp723) - (K555570233 * tmp722);
	  }
	  {
	       fftw_real tmp693;
	       fftw_real tmp702;
	       fftw_real tmp725;
	       fftw_real tmp726;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp693 = tmp677 + tmp692;
	       tmp702 = tmp700 + tmp701;
	       tmp703 = (K980785280 * tmp693) - (K195090322 * tmp702);
	       tmp715 = (K195090322 * tmp693) + (K980785280 * tmp702);
	       tmp725 = tmp677 - tmp692;
	       tmp726 = tmp701 - tmp700;
	       tmp727 = (K831469612 * tmp725) - (K555570233 * tmp726);
	       tmp735 = (K555570233 * tmp725) + (K831469612 * tmp726);
	  }
	  {
	       fftw_real tmp637;
	       fftw_real tmp704;
	       fftw_real tmp711;
	       fftw_real tmp712;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp637 = tmp629 + tmp636;
	       tmp704 = tmp670 + tmp703;
	       real_output[60 * real_ostride] = tmp637 - tmp704;
	       real_output[4 * real_ostride] = tmp637 + tmp704;
	       tmp711 = tmp707 - tmp710;
	       tmp712 = tmp703 - tmp670;
	       imag_output[28 * imag_ostride] = tmp711 + tmp712;
	       imag_output[36 * imag_ostride] = tmp712 - tmp711;
	  }
	  {
	       fftw_real tmp713;
	       fftw_real tmp716;
	       fftw_real tmp717;
	       fftw_real tmp718;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp713 = tmp710 + tmp707;
	       tmp716 = tmp714 + tmp715;
	       imag_output[4 * imag_ostride] = tmp713 + tmp716;
	       imag_output[60 * imag_ostride] = tmp716 - tmp713;
	       tmp717 = tmp629 - tmp636;
	       tmp718 = tmp715 - tmp714;
	       real_output[36 * real_ostride] = tmp717 - tmp718;
	       real_output[28 * real_ostride] = tmp717 + tmp718;
	  }
	  {
	       fftw_real tmp721;
	       fftw_real tmp728;
	       fftw_real tmp731;
	       fftw_real tmp732;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp721 = tmp719 + tmp720;
	       tmp728 = tmp724 + tmp727;
	       real_output[52 * real_ostride] = tmp721 - tmp728;
	       real_output[12 * real_ostride] = tmp721 + tmp728;
	       tmp731 = tmp729 - tmp730;
	       tmp732 = tmp727 - tmp724;
	       imag_output[20 * imag_ostride] = tmp731 + tmp732;
	       imag_output[44 * imag_ostride] = tmp732 - tmp731;
	  }
	  {
	       fftw_real tmp733;
	       fftw_real tmp736;
	       fftw_real tmp737;
	       fftw_real tmp738;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp733 = tmp730 + tmp729;
	       tmp736 = tmp734 + tmp735;
	       imag_output[12 * imag_ostride] = tmp733 + tmp736;
	       imag_output[52 * imag_ostride] = tmp736 - tmp733;
	       tmp737 = tmp719 - tmp720;
	       tmp738 = tmp735 - tmp734;
	       real_output[44 * real_ostride] = tmp737 - tmp738;
	       real_output[20 * real_ostride] = tmp737 + tmp738;
	  }
     }
     {
	  fftw_real tmp795;
	  fftw_real tmp877;
	  fftw_real tmp882;
	  fftw_real tmp892;
	  fftw_real tmp885;
	  fftw_real tmp893;
	  fftw_real tmp857;
	  fftw_real tmp873;
	  fftw_real tmp836;
	  fftw_real tmp872;
	  fftw_real tmp861;
	  fftw_real tmp878;
	  fftw_real tmp814;
	  fftw_real tmp887;
	  fftw_real tmp868;
	  fftw_real tmp888;
	  ASSERT_ALIGNED_DOUBLE;
	  {
	       fftw_real tmp787;
	       fftw_real tmp794;
	       fftw_real tmp880;
	       fftw_real tmp881;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp787 = tmp783 + tmp786;
	       tmp794 = tmp790 + tmp793;
	       tmp795 = tmp787 + tmp794;
	       tmp877 = tmp787 - tmp794;
	       tmp880 = tmp820 - tmp827;
	       tmp881 = tmp834 - tmp831;
	       tmp882 = (K773010453 * tmp880) + (K634393284 * tmp881);
	       tmp892 = (K773010453 * tmp881) - (K634393284 * tmp880);
	  }
	  {
	       fftw_real tmp883;
	       fftw_real tmp884;
	       fftw_real tmp849;
	       fftw_real tmp856;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp883 = tmp841 - tmp848;
	       tmp884 = tmp855 - tmp852;
	       tmp885 = (K773010453 * tmp883) - (K634393284 * tmp884);
	       tmp893 = (K634393284 * tmp883) + (K773010453 * tmp884);
	       tmp849 = tmp841 + tmp848;
	       tmp856 = tmp852 + tmp855;
	       tmp857 = (K995184726 * tmp849) - (K098017140 * tmp856);
	       tmp873 = (K098017140 * tmp849) + (K995184726 * tmp856);
	  }
	  {
	       fftw_real tmp828;
	       fftw_real tmp835;
	       fftw_real tmp859;
	       fftw_real tmp860;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp828 = tmp820 + tmp827;
	       tmp835 = tmp831 + tmp834;
	       tmp836 = (K995184726 * tmp828) + (K098017140 * tmp835);
	       tmp872 = (K995184726 * tmp835) - (K098017140 * tmp828);
	       tmp859 = (K980785280 * tmp803) - (K195090322 * tmp800);
	       tmp860 = (K195090322 * tmp809) + (K980785280 * tmp812);
	       tmp861 = tmp859 + tmp860;
	       tmp878 = tmp860 - tmp859;
	  }
	  {
	       fftw_real tmp804;
	       fftw_real tmp813;
	       fftw_real tmp864;
	       fftw_real tmp867;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp804 = (K980785280 * tmp800) + (K195090322 * tmp803);
	       tmp813 = (K980785280 * tmp809) - (K195090322 * tmp812);
	       tmp814 = tmp804 + tmp813;
	       tmp887 = tmp813 - tmp804;
	       tmp864 = tmp862 + tmp863;
	       tmp867 = tmp865 + tmp866;
	       tmp868 = tmp864 + tmp867;
	       tmp888 = tmp867 - tmp864;
	  }
	  {
	       fftw_real tmp815;
	       fftw_real tmp858;
	       fftw_real tmp869;
	       fftw_real tmp870;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp815 = tmp795 + tmp814;
	       tmp858 = tmp836 + tmp857;
	       real_output[62 * real_ostride] = tmp815 - tmp858;
	       real_output[2 * real_ostride] = tmp815 + tmp858;
	       tmp869 = tmp861 - tmp868;
	       tmp870 = tmp857 - tmp836;
	       imag_output[30 * imag_ostride] = tmp869 + tmp870;
	       imag_output[34 * imag_ostride] = tmp870 - tmp869;
	  }
	  {
	       fftw_real tmp871;
	       fftw_real tmp874;
	       fftw_real tmp875;
	       fftw_real tmp876;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp871 = tmp868 + tmp861;
	       tmp874 = tmp872 + tmp873;
	       imag_output[2 * imag_ostride] = tmp871 + tmp874;
	       imag_output[62 * imag_ostride] = tmp874 - tmp871;
	       tmp875 = tmp795 - tmp814;
	       tmp876 = tmp873 - tmp872;
	       real_output[34 * real_ostride] = tmp875 - tmp876;
	       real_output[30 * real_ostride] = tmp875 + tmp876;
	  }
	  {
	       fftw_real tmp879;
	       fftw_real tmp886;
	       fftw_real tmp889;
	       fftw_real tmp890;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp879 = tmp877 + tmp878;
	       tmp886 = tmp882 + tmp885;
	       real_output[50 * real_ostride] = tmp879 - tmp886;
	       real_output[14 * real_ostride] = tmp879 + tmp886;
	       tmp889 = tmp887 - tmp888;
	       tmp890 = tmp885 - tmp882;
	       imag_output[18 * imag_ostride] = tmp889 + tmp890;
	       imag_output[46 * imag_ostride] = tmp890 - tmp889;
	  }
	  {
	       fftw_real tmp891;
	       fftw_real tmp894;
	       fftw_real tmp895;
	       fftw_real tmp896;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp891 = tmp888 + tmp887;
	       tmp894 = tmp892 + tmp893;
	       imag_output[14 * imag_ostride] = tmp891 + tmp894;
	       imag_output[50 * imag_ostride] = tmp894 - tmp891;
	       tmp895 = tmp877 - tmp878;
	       tmp896 = tmp893 - tmp892;
	       real_output[46 * real_ostride] = tmp895 - tmp896;
	       real_output[18 * real_ostride] = tmp895 + tmp896;
	  }
     }
     {
	  fftw_real tmp899;
	  fftw_real tmp937;
	  fftw_real tmp942;
	  fftw_real tmp952;
	  fftw_real tmp945;
	  fftw_real tmp953;
	  fftw_real tmp921;
	  fftw_real tmp933;
	  fftw_real tmp914;
	  fftw_real tmp932;
	  fftw_real tmp925;
	  fftw_real tmp938;
	  fftw_real tmp906;
	  fftw_real tmp947;
	  fftw_real tmp928;
	  fftw_real tmp948;
	  ASSERT_ALIGNED_DOUBLE;
	  {
	       fftw_real tmp897;
	       fftw_real tmp898;
	       fftw_real tmp940;
	       fftw_real tmp941;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp897 = tmp783 - tmp786;
	       tmp898 = tmp866 - tmp865;
	       tmp899 = tmp897 - tmp898;
	       tmp937 = tmp897 + tmp898;
	       tmp940 = tmp909 + tmp908;
	       tmp941 = tmp911 + tmp912;
	       tmp942 = (K290284677 * tmp940) + (K956940335 * tmp941);
	       tmp952 = (K956940335 * tmp940) - (K290284677 * tmp941);
	  }
	  {
	       fftw_real tmp943;
	       fftw_real tmp944;
	       fftw_real tmp917;
	       fftw_real tmp920;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp943 = tmp915 + tmp916;
	       tmp944 = tmp919 + tmp9