lilian
/
5ndft_vhdl
1
0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
Files of a 5*2^n VHDL entity using Winograd5 and radix2 implementations
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
6 Commits
2 Branches
42KB
Branch: master
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'master'
${ noResults }
5ndft_vhdl/winograd5.vhd

310 lines
17KB
Raw Permalink Blame History 

  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;