mul72.vhd

在gf(2^13)中

--------------------------------------------------------------------------------
-- Company: 
-- Engineer:
--
-- Create Date:    20:38:34 04/01/08
-- Design Name:    
-- Module Name:    mul72 - Behavioral
-- Project Name:   
-- Target Device:  
-- Tool versions:  
-- Description:
--
-- Dependencies:
-- 
-- Revision:
-- Revision 0.01 - File Created
-- Additional Comments:
-- 
--------------------------------------------------------------------------------
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.STD_LOGIC_ARITH.ALL;
use IEEE.STD_LOGIC_UNSIGNED.ALL;

---- Uncomment the following library declaration if instantiating
---- any Xilinx primitives in this code.
--library UNISIM;
--use UNISIM.VComponents.all;

entity mul72 is
	port(
	mul72_in:in std_logic_vector(12 downto 0);	  --msb_lsb
	mul72_out:out std_logic_vector(12 downto 0)
	);
end mul72;

architecture Behavioral of mul72 is

begin

mul72_out(0)<=mul72_in(9) xor mul72_in(1) xor mul72_in(4) xor mul72_in(5) xor mul72_in(10);
mul72_out(1)<=mul72_in(6) xor mul72_in(9) xor mul72_in(1) xor mul72_in(4) xor mul72_in(11) xor mul72_in(2);
mul72_out(2)<=mul72_in(12) xor mul72_in(10) xor mul72_in(3) xor mul72_in(7) xor mul72_in(0) xor mul72_in(2) xor mul72_in(5);
mul72_out(3)<=mul72_in(8) xor mul72_in(9) xor mul72_in(5) xor mul72_in(3) xor mul72_in(11) xor mul72_in(6) xor mul72_in(10);
mul72_out(4)<=mul72_in(11) xor mul72_in(6) xor mul72_in(0) xor mul72_in(12) xor mul72_in(7) xor mul72_in(5) xor mul72_in(1);
mul72_out(5)<=mul72_in(8) xor mul72_in(2) xor mul72_in(6) xor mul72_in(1) xor mul72_in(7) xor mul72_in(12);
mul72_out(6)<=mul72_in(2) xor mul72_in(9) xor mul72_in(8) xor mul72_in(7) xor mul72_in(3);
mul72_out(7)<=mul72_in(8) xor mul72_in(4) xor mul72_in(10) xor mul72_in(3) xor mul72_in(9);
mul72_out(8)<=mul72_in(5) xor mul72_in(11) xor mul72_in(4) xor mul72_in(10) xor mul72_in(0) xor mul72_in(9);
mul72_out(9)<=mul72_in(11) xor mul72_in(10) xor mul72_in(1) xor mul72_in(5) xor mul72_in(6) xor mul72_in(0) xor mul72_in(12);
mul72_out(10)<=mul72_in(11) xor mul72_in(2) xor mul72_in(12) xor mul72_in(6) xor mul72_in(1) xor mul72_in(7);
mul72_out(11)<=mul72_in(12) xor mul72_in(3) xor mul72_in(2) xor mul72_in(8) xor mul72_in(7);
mul72_out(12)<=mul72_in(9) xor mul72_in(3) xor mul72_in(0) xor mul72_in(4) xor mul72_in(8);

end Behavioral;