tests/clight/fir_complexe.c.expected

   1 int t1[16];\r
   2 int t2[16];\r
   3 int t3[16];\r
   4 int t4[16];\r
   5 int t5[16];\r
   6 int t6[16];\r
   7 \r
   8 void init(){\r
   9         int i;\r
  10         for(i=0;i<16;i++){\r
  11                 t1[i] = 2;\r
  12                 t2[i] = 2;\r
  13                 t3[i] = 2;\r
  14                 t4[i] = 2;\r
  15                 t5[i] = 2;\r
  16                 t6[i] = 2;\r
  17         }\r
  18 }\r
  19 \r
  20 int comp_fir_complexe(int in_re[], int in_im[], int c_re[], int c_im[], int out_re[], int out_im[], int size) {\r
  21     int i,j,res_re,res_im,tmp_im,tmp_re,tmp_x_re,tmp_x_im;\r
  22         int x_re[16];\r
  23         int x_im[16];\r
  24         int ii;\r
  25         for(ii=0;ii<16;ii++){x_re[ii]=0;x_im[ii]=0;}\r
  26         int adx = 0;\r
  27         res_re = 0; res_im = 0;\r
  28         for (j=0;j<size;j=j+1) {\r
  29                 x_re[adx]=in_re[j];\r
  30                 x_im[adx]=in_im[j];\r
  31 \r
  32             for(i=0;i<16;i=i+1){\r
  33                 tmp_x_re = x_re[adx];\r
  34                 tmp_x_im = x_im[adx];\r
  35                 tmp_re = (tmp_x_re*c_re[i]-tmp_x_im*c_im[i])>>4;\r
  36                 tmp_im = (tmp_x_re*c_im[i]+tmp_x_im*c_re[i])>>4;\r
  37                 res_re = res_re + tmp_re;\r
  38                 res_im = res_im + tmp_im;\r
  39                 adx=(adx+1)%16;\r
  40             }\r
  41 \r
  42             adx=(adx+1)%16;\r
  43 \r
  44             out_re[j]=res_re;\r
  45             out_im[j]=res_im;\r
  46     }\r
  47         return 0;\r
  48 }\r
  49 int main(){\r
  50         init();\r
  51         return comp_fir_complexe(t1,t2,t3,t4,t5,t6,16);\r
  52 }\r