mul40.vhd

bch 编码和译码

--------------------------------------------------------------------------------
-- Company: 
-- Engineer:
--
-- Create Date:    20:37:48 04/01/08
-- Design Name:    
-- Module Name:    mul40 - 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 mul40 is
	port(
	mul40_in:in std_logic_vector(12 downto 0);	  --msb_lsb
	mul40_out:out std_logic_vector(12 downto 0)
	);
end mul40;

architecture Behavioral of mul40 is

begin

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


end Behavioral;