lilian
/
5ndft_vhdl
1
0
Bifurcation 0
Code Tickets 0 Demandes d'ajout 0 Versions 0 Wiki Activité
Files of a 5*2^n VHDL entity using Winograd5 and radix2 implementations
Vous ne pouvez pas sélectionner plus de 25 sujets Les noms de sujets doivent commencer par une lettre ou un nombre, peuvent contenir des tirets ('-') et peuvent comporter jusqu'à 35 caractères.
6 Révisions
2 Branches
42KB
Branche: master
Branches Tags
${ item.name }
Créer la branche ${ searchTerm }
de 'master'
${ noResults }
5ndft_vhdl/winograd5.vhd

310 lignes
17KB
Brut Lien permanent Annotations Historique 

  1. LIBRARY ieee;

  2. USE ieee.std_logic_1164.ALL;

  3. USE ieee.std_logic_signed.ALL;

  4. USE ieee.numeric_std.ALL;

  5. USE work.FIVEn_DFT_PKG.ALL;

  6. 

  7. ENTITY WINOGRAD5 IS

  8.   PORT(

  9.     i_clk     : IN  std_logic;

  10.     i_data_im : IN  vect_input_winograd5_5ndft;

  11.     i_data_re : IN  vect_input_winograd5_5ndft;

  12.     o_data_im : OUT vect_output_winograd5_5ndft;

  13.     o_data_re : OUT vect_output_winograd5_5ndft

  14.     );

  15. END WINOGRAD5;

  16. 

  17. ARCHITECTURE Behavioral OF WINOGRAD5 IS

  18. 

  19.   SIGNAL mult_factors              : vect_mult_factors_32b          := ("10110000000000000000000000000000", "00100011110001101110111100110111", "00010111001111111101011000011110", "01100010011111000110001000101111", "00100101100111100100011000001001");

  20.   -- multipliers multiplied by 2^30

  21.   SIGNAL mult_factor_w_multipliers : vect_mult_factor_w_multipliers := (OTHERS => (OTHERS => '0'));

  22. 

  23.   --SIGNAL matrix_stages_signed_im             : matrix_winograd5_generic_signed_stages                              := (OTHERS => (OTHERS => (OTHERS => '0')));

  24.   --SIGNAL matrix_stages_signed_re             : matrix_winograd5_generic_signed_stages                              := (OTHERS => (OTHERS => (OTHERS => '0')));

  25.   SIGNAL matrix_stages_im                    : matrix_winograd5_generic_stages                                     := (OTHERS => (OTHERS => (OTHERS => '0')));  --matrix(x)(y) = matrix(stage)(layer) form

  26.   SIGNAL matrix_stages_re                    : matrix_winograd5_generic_stages                                     := (OTHERS => (OTHERS => (OTHERS => '0')));  -- matrix(x)(y) = matrix(stage)(layer) form

  27.   SIGNAL multiply_by_2_power_cst_w_precision : std_logic_vector(cst_w_precision_winograd5_coeffs_5ndft-3 DOWNTO 0) := (OTHERS => '0');

  28.   --SIGNAL in1, in2        :    smpl_out_winograd5_5ndft;

  29.   --SIGNAL isigned         :    smpl_out_winograd5_signed_5ndft;

  30. 

  31. 

  32. 

  33. 

  34. 

  35.   FUNCTION add_sub (

  36.     w_smpl   : IN natural;

  37.     sub      : IN boolean;

  38.     in1, in2 : IN smpl_out_winograd5_5ndft)

  39.     RETURN smpl_out_winograd5_5ndft IS

  40.     VARIABLE smpl_stages_out : smpl_out_winograd5_5ndft := (OTHERS => '0');

  41.     VARIABLE isigned         : smpl_out_winograd5_signed_5ndft;

  42.   BEGIN

  43.     IF sub THEN

  44.       isigned(w_smpl DOWNTO 0) := signed(in1(w_smpl-1)&in1(w_smpl-1 DOWNTO 0))-signed(in2(w_smpl-1)&in2(w_smpl-1 DOWNTO 0));

  45.     ELSE

  46.       isigned(w_smpl DOWNTO 0) := signed(in1(w_smpl-1)&in1(w_smpl-1 DOWNTO 0))+signed(in2(w_smpl-1)&in2(w_smpl-1 DOWNTO 0));

  47.     END IF;

  48. 

  49.     smpl_stages_out(w_smpl DOWNTO 0) := std_logic_vector(unsigned(isigned(w_smpl DOWNTO 0)));

  50.     RETURN smpl_stages_out;

  51.   END FUNCTION;

  52. 

  53. 

  54. 

  55. 

  56. 

  57.   FUNCTION mult (

  58.     w_smpl  : IN natural;

  59.     cmplx   : IN boolean;

  60.     w_coeff : IN natural;

  61.     input   : IN smpl_out_winograd5_5ndft;

  62.     coeff   : IN smpl_mult_factor_w_multipliers

  63.     )

  64.     RETURN std_logic_vector IS

  65.     VARIABLE smpl_signed : smpl_out_winograd5_signed_5ndft := (OTHERS => '0');

  66.     VARIABLE smpl_out    : smpl_out_winograd5_5ndft;

  67.   BEGIN  -- FUNCTION mult

  68.     IF(cmplx) THEN

  69.       smpl_signed(w_smpl+w_coeff-1 DOWNTO 0) := signed(input(w_smpl-1 DOWNTO 0)) * (-signed(coeff));

  70.     ELSE

  71.       smpl_signed(w_smpl+w_coeff-1 DOWNTO 0) := signed(input(w_smpl-1 DOWNTO 0)) * signed(coeff);

  72.     END IF;

  73.     smpl_out := std_logic_vector(unsigned(smpl_signed));

  74.     RETURN smpl_out;

  75.   END FUNCTION mult;

  76. 

  77. 

  78. 

  79. 

  80. 

  81.   FUNCTION smpl_copy (

  82.     w_smpl  : natural;

  83.     smpl_in : smpl_out_winograd5_5ndft)

  84.     RETURN std_logic_vector IS

  85.     VARIABLE smpl_out : smpl_out_winograd5_5ndft := (OTHERS => '0');

  86.   BEGIN  -- FUNCTION copy

  87.     smpl_out(w_smpl DOWNTO 0) := smpl_in(w_smpl-1)&smpl_in(w_smpl-1 DOWNTO 0);

  88.     RETURN smpl_out;  --smpl_in(cst_winograd5_w_out_5ndft-1 DOWNTO w_smpl+1)&smpl_in(w_smpl-1)&smpl_in(w_smpl-1 DOWNTO 0);--smpl_out;

  89.   END FUNCTION smpl_copy;

  90. 

  91. 

  92. BEGIN

  93. 

  94. 

  95.   fill_input_output_matrix_for : FOR i IN 0 TO 4 GENERATE

  96. 

  97.     matrix_stages_im(0)(i)(cst_w_in_5ndft-1 DOWNTO 0) <= i_data_im(i)(cst_w_in_5ndft-1 DOWNTO 0);

  98.     matrix_stages_re(0)(i)(cst_w_in_5ndft-1 DOWNTO 0) <= i_data_re(i)(cst_w_in_5ndft-1 DOWNTO 0);

  99.     o_data_im(i)                                      <= matrix_stages_im(7)(i);

  100.     o_data_re(i)                                      <= matrix_stages_re(7)(i);

  101. 

  102.   END GENERATE fill_input_output_matrix_for;

  103. 

  104. 

  105. 

  106.   -- purpose: Rounds the data in 32bits into cst_w_precision_winograd5_coeffs_5ndft bits (round for

  107.   -- MSBs). Should run and cut before simulation and bitstream

  108.   -- inputs : the coeffs to be cut mult_factors

  109.   -- outputs: the cut coeffs mult_factor_w_multipliers

  110.   mult_coeffs_cut : PROCESS(mult_factors)

  111.   BEGIN

  112.     FOR i IN 1 TO 5 LOOP

  113.       mult_factor_w_multipliers(i) <= mult_factors(i)(31 DOWNTO 32-cst_w_precision_winograd5_coeffs_5ndft);

  114.       IF(mult_factors(i)(31-cst_w_precision_winograd5_coeffs_5ndft) = '1') THEN

  115.         mult_factor_w_multipliers(i) <= std_logic_vector(unsigned(signed(mult_factors(i)(31 DOWNTO 32-cst_w_precision_winograd5_coeffs_5ndft)) +1));

  116.       END IF;

  117.     END LOOP;  -- i

  118.   END PROCESS mult_coeffs_cut;

  119. 

  120. 

  121. 

  122.   -- purpose: calculates each stage following the winograd5 schema

  123.   -- inputs:  matrix_stages_im(0)

  124.   -- outputs: matrix_stages_im(7)

  125.   calculations_process : PROCESS(i_clk)

  126.     VARIABLE w_smpl : natural;

  127.   BEGIN

  128. 

  129.     IF(rising_edge(i_clk)) THEN

  130. 

  131.       -- stage 1

  132.       -- w_smpl              :=== cst_w_in_5ndft+1;

  133.       --data0

  134.       matrix_stages_im(1)(0) <= smpl_copy(w_smpl => cst_w_in_5ndft, smpl_in => matrix_stages_im(0)(0));

  135.       matrix_stages_re(1)(0) <= smpl_copy(w_smpl => cst_w_in_5ndft, smpl_in => matrix_stages_re(0)(0));

  136. 

  137.       -- data1

  138.       matrix_stages_im(1)(1) <= add_sub (w_smpl => cst_w_in_5ndft, sub => false, in1 => matrix_stages_im(0)(3), in2 => matrix_stages_im(0)(2));

  139.       matrix_stages_re(1)(1) <= add_sub (w_smpl => cst_w_in_5ndft, sub => false, in1 => matrix_stages_re(0)(3), in2 => matrix_stages_re(0)(2));

  140. 

  141.       --data2

  142.       matrix_stages_im(1)(2) <= add_sub (w_smpl => cst_w_in_5ndft, sub => false, in1 => matrix_stages_im(0)(4), in2 => matrix_stages_im(0)(1));

  143.       matrix_stages_re(1)(2) <= add_sub (w_smpl => cst_w_in_5ndft, sub => false, in1 => matrix_stages_re(0)(4), in2 => matrix_stages_re(0)(1));

  144. 

  145.       --data3

  146.       matrix_stages_im(1)(3) <= add_sub (w_smpl => cst_w_in_5ndft, sub => true, in1 => matrix_stages_im(0)(3), in2 => matrix_stages_im(0)(2));

  147.       matrix_stages_re(1)(3) <= add_sub (w_smpl => cst_w_in_5ndft, sub => true, in1 => matrix_stages_re(0)(3), in2 => matrix_stages_re(0)(2));

  148. 

  149.       --data4

  150.       matrix_stages_im(1)(4) <= add_sub (w_smpl => cst_w_in_5ndft, sub => true, in1 => matrix_stages_im(0)(1), in2 => matrix_stages_im(0)(4));

  151.       matrix_stages_re(1)(4) <= add_sub (w_smpl => cst_w_in_5ndft, sub => true, in1 => matrix_stages_re(0)(1), in2 => matrix_stages_re(0)(4));

  152. 

  153. 

  154. 

  155. 

  156. 

  157.       -- stage 2

  158.       w_smpl                 := cst_w_in_5ndft+1;

  159.       -- data0,3,4

  160.       matrix_stages_im(2)(0) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(1)(0));

  161.       matrix_stages_re(2)(0) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(1)(0));

  162.       matrix_stages_im(2)(3) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(1)(3));

  163.       matrix_stages_re(2)(3) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(1)(3));

  164.       matrix_stages_im(2)(4) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(1)(4));

  165.       matrix_stages_re(2)(4) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(1)(4));

  166. 

  167.       --data1

  168.       matrix_stages_im(2)(1) <= add_sub (w_smpl => w_smpl, sub => false, in1 => matrix_stages_im(1)(1), in2 => matrix_stages_im(1)(2));

  169.       matrix_stages_re(2)(1) <= add_sub (w_smpl => w_smpl, sub => false, in1 => matrix_stages_re(1)(1), in2 => matrix_stages_re(1)(2));

  170. 

  171.       --data2

  172.       matrix_stages_re(2)(2) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_re(1)(2), in2 => matrix_stages_re(1)(1));

  173.       matrix_stages_im(2)(2) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_im(1)(2), in2 => matrix_stages_im(1)(1));

  174. 

  175.       --data5

  176.       matrix_stages_re(2)(5) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_re(1)(3), in2 => matrix_stages_re(1)(4));

  177.       matrix_stages_im(2)(5) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_im(1)(3), in2 => matrix_stages_im(1)(4));

  178. 

  179. 

  180. 

  181. 

  182. 

  183.       -- stage 3

  184.       w_smpl                 := cst_w_in_5ndft+2;

  185.       --data1,2,3,4,5

  186.       matrix_stages_im(3)(1) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(2)(1));

  187.       matrix_stages_re(3)(1) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(2)(1));

  188.       matrix_stages_im(3)(2) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(2)(2));

  189.       matrix_stages_re(3)(2) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(2)(2));

  190.       matrix_stages_im(3)(3) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(2)(3));

  191.       matrix_stages_re(3)(3) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(2)(3));

  192.       matrix_stages_im(3)(4) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(2)(4));

  193.       matrix_stages_re(3)(4) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(2)(4));

  194.       matrix_stages_im(3)(5) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(2)(5));

  195.       matrix_stages_re(3)(5) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(2)(5));

  196. 

  197.       --data0

  198.       matrix_stages_im(3)(0) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_im(2)(1), in2 => matrix_stages_im(2)(0));

  199.       matrix_stages_re(3)(0) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_re(2)(1), in2 => matrix_stages_re(2)(0));

  200. 

  201. 

  202. 

  203. 

  204. 

  205.       -- stage 4, multiply

  206.       w_smpl                                                                           := cst_w_in_5ndft+3;

  207.       --data0, multiply by 1 = copy

  208.       matrix_stages_im(4)(0)(w_smpl+cst_w_precision_winograd5_coeffs_5ndft-1 DOWNTO 0) <= matrix_stages_im(3)(0)(w_smpl-1)&matrix_stages_im(3)(0)(w_smpl-1)&matrix_stages_im(3)(0)(w_smpl-1 DOWNTO 0)&multiply_by_2_power_cst_w_precision;

  209.       matrix_stages_re(4)(0)(w_smpl+cst_w_precision_winograd5_coeffs_5ndft-1 DOWNTO 0) <= matrix_stages_re(3)(0)(w_smpl-1)&matrix_stages_re(3)(0)(w_smpl-1)&matrix_stages_re(3)(0)(w_smpl-1 DOWNTO 0)&multiply_by_2_power_cst_w_precision;

  210. 

  211.       --data1

  212.       matrix_stages_im(4)(1) <= mult (w_smpl => w_smpl, cmplx => false, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_im(3)(1), coeff => mult_factor_w_multipliers(1));

  213.       matrix_stages_re(4)(1) <= mult (w_smpl => w_smpl, cmplx => false, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_re(3)(1), coeff => mult_factor_w_multipliers(1));

  214. 

  215.       --data2

  216.       matrix_stages_im(4)(2) <= mult (w_smpl => w_smpl, cmplx => false, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_im(3)(2), coeff => mult_factor_w_multipliers(2));

  217.       matrix_stages_re(4)(2) <= mult (w_smpl => w_smpl, cmplx => false, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_re(3)(2), coeff => mult_factor_w_multipliers(2));

  218. 

  219.       --data3

  220.       matrix_stages_re(4)(3) <= mult (w_smpl => w_smpl, cmplx => true, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_im(3)(3), coeff => mult_factor_w_multipliers(3));

  221.       matrix_stages_im(4)(3) <= mult (w_smpl => w_smpl, cmplx => false, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_re(3)(3), coeff => mult_factor_w_multipliers(3));

  222. 

  223.       --data4

  224.       matrix_stages_re(4)(4) <= mult (w_smpl => w_smpl, cmplx => true, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_im(3)(4), coeff => mult_factor_w_multipliers(4));

  225.       matrix_stages_im(4)(4) <= mult (w_smpl => w_smpl, cmplx => false, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_re(3)(4), coeff => mult_factor_w_multipliers(4));

  226. 

  227.       --data5

  228.       matrix_stages_re(4)(5) <= mult (w_smpl => w_smpl, cmplx => true, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_im(3)(5), coeff => mult_factor_w_multipliers(5));

  229.       matrix_stages_im(4)(5) <= mult (w_smpl => w_smpl, cmplx => false, w_coeff => cst_w_precision_winograd5_coeffs_5ndft, input => matrix_stages_re(3)(5), coeff => mult_factor_w_multipliers(5));

  230. 

  231. 

  232. 

  233. 

  234. 

  235.       -- stage 5

  236.       w_smpl                 := cst_w_in_5ndft+3+cst_w_precision_winograd5_coeffs_5ndft;

  237.       --data0, 2, 3, 4, 5

  238.       matrix_stages_im(5)(0) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(4)(0));

  239.       matrix_stages_re(5)(0) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(4)(0));

  240.       matrix_stages_im(5)(2) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(4)(2));

  241.       matrix_stages_re(5)(2) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(4)(2));

  242.       matrix_stages_im(5)(3) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(4)(3));

  243.       matrix_stages_re(5)(3) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(4)(3));

  244.       matrix_stages_im(5)(4) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(4)(4));

  245.       matrix_stages_re(5)(4) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(4)(4));

  246.       matrix_stages_im(5)(5) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(4)(5));

  247.       matrix_stages_re(5)(5) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(4)(5));

  248. 

  249.       --data1

  250.       matrix_stages_re(5)(1) <= add_sub(w_smpl => w_smpl, sub => false, IN1 => matrix_stages_re(4)(1), in2 => matrix_stages_re(4)(0));

  251.       matrix_stages_im(5)(1) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_im(4)(1), in2 => matrix_stages_im(4)(0));

  252. 

  253. 

  254. 

  255. 

  256. 

  257.       -- stage 6

  258.       w_smpl                 := cst_w_in_5ndft+3+cst_w_precision_winograd5_coeffs_5ndft+1;

  259.       --data0

  260.       matrix_stages_im(6)(0) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(5)(0));

  261.       matrix_stages_re(6)(0) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(5)(0));

  262. 

  263.       --data1

  264.       matrix_stages_re(6)(1) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_re(5)(1), in2 => matrix_stages_re(5)(2));

  265.       matrix_stages_im(6)(1) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_im(5)(1), in2 => matrix_stages_im(5)(2));

  266. 

  267.       --data2

  268.       matrix_stages_re(6)(2) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_re(5)(1), in2 => matrix_stages_re(5)(2));

  269.       matrix_stages_im(6)(2) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_im(5)(1), in2 => matrix_stages_im(5)(2));

  270. 

  271.       --data3

  272.       matrix_stages_re(6)(3) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_re(5)(5), in2 => matrix_stages_re(5)(3));

  273.       matrix_stages_im(6)(3) <= add_sub(w_smpl => w_smpl, sub => false, IN1 => matrix_stages_im(5)(5), in2 => matrix_stages_im(5)(3));

  274. 

  275.       --data4

  276.       matrix_stages_re(6)(4) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_re(5)(5), in2 => matrix_stages_re(5)(4));

  277.       matrix_stages_im(6)(4) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_im(5)(5), in2 => matrix_stages_im(5)(4));

  278. 

  279. 

  280. 

  281. 

  282. 

  283.       -- stage 7

  284.       w_smpl                 := cst_w_in_5ndft+3+cst_w_precision_winograd5_coeffs_5ndft+2;

  285.       --data0

  286.       matrix_stages_im(7)(0) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_im(6)(0));

  287.       matrix_stages_re(7)(0) <= smpl_copy(w_smpl => w_smpl, smpl_in => matrix_stages_re(6)(0));

  288. 

  289.       --data1

  290.       matrix_stages_re(7)(1) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_re(6)(2), in2 => matrix_stages_re(6)(4));

  291.       matrix_stages_im(7)(1) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_im(6)(2), in2 => matrix_stages_im(6)(4));

  292. 

  293.       --data2

  294.       matrix_stages_re(7)(2) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_re(6)(1), in2 => matrix_stages_re(6)(3));

  295.       matrix_stages_im(7)(2) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_im(6)(1), in2 => matrix_stages_im(6)(3));

  296. 

  297.       --data3

  298.       matrix_stages_re(7)(3) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_re(6)(1), in2 => matrix_stages_re(6)(3));

  299.       matrix_stages_im(7)(3) <= add_sub(w_smpl => w_smpl, sub => false, in1 => matrix_stages_im(6)(1), in2 => matrix_stages_im(6)(3));

  300. 

  301.       --data4

  302.       matrix_stages_re(7)(4) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_re(6)(2), in2 => matrix_stages_re(6)(4));

  303.       matrix_stages_im(7)(4) <= add_sub(w_smpl => w_smpl, sub => true, in1 => matrix_stages_im(6)(2), in2 => matrix_stages_im(6)(4));

  304. 

  305.     END IF;

  306.   END PROCESS calculations_process;

  307. 

  308. 

  309. END Behavioral;