fcr_128.c

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

	       fftw_real tmp530;
	       ASSERT_ALIGNED_DOUBLE;
	       {
		    fftw_real tmp35;
		    fftw_real tmp36;
		    fftw_real tmp178;
		    fftw_real tmp179;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp35 = real_input[2 * real_istride];
		    tmp36 = real_input[62 * real_istride];
		    tmp37 = tmp35 + tmp36;
		    tmp529 = tmp35 - tmp36;
		    tmp178 = imag_input[2 * imag_istride];
		    tmp179 = imag_input[62 * imag_istride];
		    tmp180 = tmp178 - tmp179;
		    tmp533 = tmp178 + tmp179;
	       }
	       {
		    fftw_real tmp38;
		    fftw_real tmp39;
		    fftw_real tmp175;
		    fftw_real tmp176;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp38 = real_input[30 * real_istride];
		    tmp39 = real_input[34 * real_istride];
		    tmp40 = tmp38 + tmp39;
		    tmp532 = tmp39 - tmp38;
		    tmp175 = imag_input[30 * imag_istride];
		    tmp176 = imag_input[34 * imag_istride];
		    tmp177 = tmp175 - tmp176;
		    tmp530 = tmp175 + tmp176;
	       }
	       tmp165 = tmp37 - tmp40;
	       tmp534 = tmp532 + tmp533;
	       tmp789 = tmp533 - tmp532;
	       tmp788 = tmp529 + tmp530;
	       tmp531 = tmp529 - tmp530;
	       tmp181 = tmp177 + tmp180;
	  }
	  {
	       fftw_real tmp522;
	       fftw_real tmp526;
	       fftw_real tmp525;
	       fftw_real tmp523;
	       ASSERT_ALIGNED_DOUBLE;
	       {
		    fftw_real tmp42;
		    fftw_real tmp43;
		    fftw_real tmp169;
		    fftw_real tmp170;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp42 = real_input[14 * real_istride];
		    tmp43 = real_input[50 * real_istride];
		    tmp44 = tmp42 + tmp43;
		    tmp522 = tmp42 - tmp43;
		    tmp169 = imag_input[14 * imag_istride];
		    tmp170 = imag_input[50 * imag_istride];
		    tmp171 = tmp169 - tmp170;
		    tmp526 = tmp169 + tmp170;
	       }
	       {
		    fftw_real tmp45;
		    fftw_real tmp46;
		    fftw_real tmp166;
		    fftw_real tmp167;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp45 = real_input[18 * real_istride];
		    tmp46 = real_input[46 * real_istride];
		    tmp47 = tmp45 + tmp46;
		    tmp525 = tmp46 - tmp45;
		    tmp166 = imag_input[18 * imag_istride];
		    tmp167 = imag_input[46 * imag_istride];
		    tmp168 = tmp166 - tmp167;
		    tmp523 = tmp166 + tmp167;
	       }
	       tmp172 = tmp168 + tmp171;
	       tmp527 = tmp525 + tmp526;
	       tmp792 = tmp526 - tmp525;
	       tmp791 = tmp522 + tmp523;
	       tmp524 = tmp522 - tmp523;
	       tmp174 = tmp47 - tmp44;
	  }
	  {
	       fftw_real tmp41;
	       fftw_real tmp48;
	       fftw_real tmp666;
	       fftw_real tmp667;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp41 = tmp37 + tmp40;
	       tmp48 = tmp44 + tmp47;
	       tmp49 = tmp41 + tmp48;
	       tmp461 = tmp41 - tmp48;
	       tmp666 = (K098017140 * tmp531) + (K995184726 * tmp534);
	       tmp667 = (K634393284 * tmp524) + (K773010453 * tmp527);
	       tmp668 = tmp666 - tmp667;
	       tmp708 = tmp667 + tmp666;
	  }
	  {
	       fftw_real tmp852;
	       fftw_real tmp853;
	       fftw_real tmp790;
	       fftw_real tmp793;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp852 = (K290284677 * tmp788) + (K956940335 * tmp789);
	       tmp853 = (K881921264 * tmp791) - (K471396736 * tmp792);
	       tmp854 = tmp852 - tmp853;
	       tmp894 = tmp853 + tmp852;
	       tmp790 = (K956940335 * tmp788) - (K290284677 * tmp789);
	       tmp793 = (K471396736 * tmp791) + (K881921264 * tmp792);
	       tmp794 = tmp790 - tmp793;
	       tmp891 = tmp793 + tmp790;
	  }
	  {
	       fftw_real tmp528;
	       fftw_real tmp535;
	       fftw_real tmp333;
	       fftw_real tmp334;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp528 = (K773010453 * tmp524) - (K634393284 * tmp527);
	       tmp535 = (K995184726 * tmp531) - (K098017140 * tmp534);
	       tmp536 = tmp528 + tmp535;
	       tmp705 = tmp535 - tmp528;
	       tmp333 = tmp165 + tmp172;
	       tmp334 = tmp181 - tmp174;
	       tmp335 = (K831469612 * tmp333) - (K555570233 * tmp334);
	       tmp365 = (K555570233 * tmp333) + (K831469612 * tmp334);
	  }
	  {
	       fftw_real tmp173;
	       fftw_real tmp182;
	       fftw_real tmp415;
	       fftw_real tmp416;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp173 = tmp165 - tmp172;
	       tmp182 = tmp174 + tmp181;
	       tmp183 = (K980785280 * tmp173) - (K195090322 * tmp182);
	       tmp293 = (K195090322 * tmp173) + (K980785280 * tmp182);
	       tmp415 = tmp180 - tmp177;
	       tmp416 = tmp171 - tmp168;
	       tmp417 = tmp415 - tmp416;
	       tmp465 = tmp416 + tmp415;
	  }
     }
     {
	  fftw_real tmp52;
	  fftw_real tmp199;
	  fftw_real tmp55;
	  fftw_real tmp196;
	  fftw_real tmp184;
	  fftw_real tmp549;
	  fftw_real tmp799;
	  fftw_real tmp798;
	  fftw_real tmp546;
	  fftw_real tmp200;
	  fftw_real tmp59;
	  fftw_real tmp190;
	  fftw_real tmp62;
	  fftw_real tmp187;
	  fftw_real tmp191;
	  fftw_real tmp542;
	  fftw_real tmp796;
	  fftw_real tmp795;
	  fftw_real tmp539;
	  fftw_real tmp193;
	  ASSERT_ALIGNED_DOUBLE;
	  {
	       fftw_real tmp544;
	       fftw_real tmp548;
	       fftw_real tmp547;
	       fftw_real tmp545;
	       ASSERT_ALIGNED_DOUBLE;
	       {
		    fftw_real tmp50;
		    fftw_real tmp51;
		    fftw_real tmp197;
		    fftw_real tmp198;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp50 = real_input[6 * real_istride];
		    tmp51 = real_input[58 * real_istride];
		    tmp52 = tmp50 + tmp51;
		    tmp544 = tmp50 - tmp51;
		    tmp197 = imag_input[6 * imag_istride];
		    tmp198 = imag_input[58 * imag_istride];
		    tmp199 = tmp197 - tmp198;
		    tmp548 = tmp197 + tmp198;
	       }
	       {
		    fftw_real tmp53;
		    fftw_real tmp54;
		    fftw_real tmp194;
		    fftw_real tmp195;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp53 = real_input[26 * real_istride];
		    tmp54 = real_input[38 * real_istride];
		    tmp55 = tmp53 + tmp54;
		    tmp547 = tmp54 - tmp53;
		    tmp194 = imag_input[26 * imag_istride];
		    tmp195 = imag_input[38 * imag_istride];
		    tmp196 = tmp194 - tmp195;
		    tmp545 = tmp194 + tmp195;
	       }
	       tmp184 = tmp52 - tmp55;
	       tmp549 = tmp547 + tmp548;
	       tmp799 = tmp548 - tmp547;
	       tmp798 = tmp544 + tmp545;
	       tmp546 = tmp544 - tmp545;
	       tmp200 = tmp196 + tmp199;
	  }
	  {
	       fftw_real tmp537;
	       fftw_real tmp541;
	       fftw_real tmp540;
	       fftw_real tmp538;
	       ASSERT_ALIGNED_DOUBLE;
	       {
		    fftw_real tmp57;
		    fftw_real tmp58;
		    fftw_real tmp188;
		    fftw_real tmp189;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp57 = real_input[10 * real_istride];
		    tmp58 = real_input[54 * real_istride];
		    tmp59 = tmp57 + tmp58;
		    tmp537 = tmp57 - tmp58;
		    tmp188 = imag_input[10 * imag_istride];
		    tmp189 = imag_input[54 * imag_istride];
		    tmp190 = tmp188 - tmp189;
		    tmp541 = tmp188 + tmp189;
	       }
	       {
		    fftw_real tmp60;
		    fftw_real tmp61;
		    fftw_real tmp185;
		    fftw_real tmp186;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp60 = real_input[22 * real_istride];
		    tmp61 = real_input[42 * real_istride];
		    tmp62 = tmp60 + tmp61;
		    tmp540 = tmp61 - tmp60;
		    tmp185 = imag_input[22 * imag_istride];
		    tmp186 = imag_input[42 * imag_istride];
		    tmp187 = tmp185 - tmp186;
		    tmp538 = tmp185 + tmp186;
	       }
	       tmp191 = tmp187 + tmp190;
	       tmp542 = tmp540 + tmp541;
	       tmp796 = tmp541 - tmp540;
	       tmp795 = tmp537 + tmp538;
	       tmp539 = tmp537 - tmp538;
	       tmp193 = tmp62 - tmp59;
	  }
	  {
	       fftw_real tmp56;
	       fftw_real tmp63;
	       fftw_real tmp669;
	       fftw_real tmp670;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp56 = tmp52 + tmp55;
	       tmp63 = tmp59 + tmp62;
	       tmp64 = tmp56 + tmp63;
	       tmp464 = tmp63 - tmp56;
	       tmp669 = (K290284677 * tmp546) + (K956940335 * tmp549);
	       tmp670 = (K471396736 * tmp539) + (K881921264 * tmp542);
	       tmp671 = tmp669 - tmp670;
	       tmp706 = tmp670 + tmp669;
	  }
	  {
	       fftw_real tmp855;
	       fftw_real tmp856;
	       fftw_real tmp797;
	       fftw_real tmp800;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp855 = (K773010453 * tmp798) + (K634393284 * tmp799);
	       tmp856 = (K995184726 * tmp795) + (K098017140 * tmp796);
	       tmp857 = tmp855 - tmp856;
	       tmp892 = tmp856 + tmp855;
	       tmp797 = (K098017140 * tmp795) - (K995184726 * tmp796);
	       tmp800 = (K634393284 * tmp798) - (K773010453 * tmp799);
	       tmp801 = tmp797 + tmp800;
	       tmp895 = tmp797 - tmp800;
	  }
	  {
	       fftw_real tmp543;
	       fftw_real tmp550;
	       fftw_real tmp336;
	       fftw_real tmp337;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp543 = (K881921264 * tmp539) - (K471396736 * tmp542);
	       tmp550 = (K956940335 * tmp546) - (K290284677 * tmp549);
	       tmp551 = tmp543 + tmp550;
	       tmp709 = tmp543 - tmp550;
	       tmp336 = tmp184 + tmp191;
	       tmp337 = tmp200 - tmp193;
	       tmp338 = (K195090322 * tmp336) + (K980785280 * tmp337);
	       tmp366 = (K980785280 * tmp336) - (K195090322 * tmp337);
	  }
	  {
	       fftw_real tmp192;
	       fftw_real tmp201;
	       fftw_real tmp418;
	       fftw_real tmp419;
	       ASSERT_ALIGNED_DOUBLE;
	       tmp192 = tmp184 - tmp191;
	       tmp201 = tmp193 + tmp200;
	       tmp202 = (K831469612 * tmp192) - (K555570233 * tmp201);
	       tmp294 = (K555570233 * tmp192) + (K831469612 * tmp201);
	       tmp418 = tmp199 - tmp196;
	       tmp419 = tmp190 - tmp187;
	       tmp420 = tmp418 - tmp419;
	       tmp462 = tmp419 + tmp418;
	  }
     }
     {
	  fftw_real tmp73;
	  fftw_real tmp205;
	  fftw_real tmp221;
	  fftw_real tmp399;
	  fftw_real tmp595;
	  fftw_real tmp804;
	  fftw_real tmp598;
	  fftw_real tmp805;
	  fftw_real tmp95;
	  fftw_real tmp233;
	  fftw_real tmp231;
	  fftw_real tmp403;
	  fftw_real tmp603;
	  fftw_real tmp814;
	  fftw_real tmp606;
	  fftw_real tmp815;
	  fftw_real tmp80;
	  fftw_real tmp214;
	  fftw_real tmp212;
	  fftw_real tmp400;
	  fftw_real tmp588;
	  fftw_real tmp807;
	  fftw_real tmp591;
	  fftw_real tmp808;
	  fftw_real tmp88;
	  fftw_real tmp224;
	  fftw_real tmp240;
	  fftw_real tmp402;
	  fftw_real tmp610;
	  fftw_real tmp811;
	  fftw_real tmp613;
	  fftw_real tmp812;
	  ASSERT_ALIGNED_DOUBLE;
	  {
	       fftw_real tmp69;
	       fftw_real tmp593;
	       fftw_real tmp220;
	       fftw_real tmp597;
	       fftw_real tmp72;
	       fftw_real tmp596;
	       fftw_real tmp217;
	       fftw_real tmp594;
	       ASSERT_ALIGNED_DOUBLE;
	       {
		    fftw_real tmp67;
		    fftw_real tmp68;
		    fftw_real tmp218;
		    fftw_real tmp219;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp67 = real_input[real_istride];
		    tmp68 = real_input[63 * real_istride];
		    tmp69 = tmp67 + tmp68;
		    tmp593 = tmp67 - tmp68;
		    tmp218 = imag_input[imag_istride];
		    tmp219 = imag_input[63 * imag_istride];
		    tmp220 = tmp218 - tmp219;
		    tmp597 = tmp218 + tmp219;
	       }
	       {
		    fftw_real tmp70;
		    fftw_real tmp71;
		    fftw_real tmp215;
		    fftw_real tmp216;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp70 = real_input[31 * real_istride];
		    tmp71 = real_input[33 * real_istride];
		    tmp72 = tmp70 + tmp71;
		    tmp596 = tmp71 - tmp70;
		    tmp215 = imag_input[31 * imag_istride];
		    tmp216 = imag_input[33 * imag_istride];
		    tmp217 = tmp215 - tmp216;
		    tmp594 = tmp215 + tmp216;
	       }
	       tmp73 = tmp69 + tmp72;
	       tmp205 = tmp69 - tmp72;
	       tmp221 = tmp217 + tmp220;
	       tmp399 = tmp220 - tmp217;
	       tmp595 = tmp593 - tmp594;
	       tmp804 = tmp593 + tmp594;
	       tmp598 = tmp596 + tmp597;
	       tmp805 = tmp597 - tmp596;
	  }
	  {
	       fftw_real tmp91;
	       fftw_real tmp601;
	       fftw_real tmp230;
	       fftw_real tmp605;
	       fftw_real tmp94;
	       fftw_real tmp604;
	       fftw_real tmp227;
	       fftw_real tmp602;
	       ASSERT_ALIGNED_DOUBLE;
	       {
		    fftw_real tmp89;
		    fftw_real tmp90;
		    fftw_real tmp228;
		    fftw_real tmp229;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp89 = real_input[9 * real_istride];
		    tmp90 = real_input[55 * real_istride];
		    tmp91 = tmp89 + tmp90;
		    tmp601 = tmp89 - tmp90;
		    tmp228 = imag_input[9 * imag_istride];
		    tmp229 = imag_input[55 * imag_istride];
		    tmp230 = tmp228 - tmp229;
		    tmp605 = tmp228 + tmp229;
	       }
	       {
		    fftw_real tmp92;
		    fftw_real tmp93;
		    fftw_real tmp225;
		    fftw_real tmp226;
		    ASSERT_ALIGNED_DOUBLE;
		    tmp92 = real_input[23 * real_istride];
		    tmp93 = real_input[41 * real_istride];
		    tmp94 = tmp92 + tmp93;
		    tmp604 = tmp93 - tmp92;
		    tmp225 = imag_input[23 * imag_istride];
		    tmp226 = imag_input[41 * imag_istride];
		    tmp227 = tmp225 - tmp226;
		    tmp602 = tmp225 + tmp226;
	       }
	       tmp95 = tmp91 + tmp94;