OpenCores
URL https://opencores.org/ocsvn/flha/flha/trunk

Subversion Repositories flha

[/] [flha/] [trunk/] [VHDL/] [Core/] [MUX1.vhd] - Blame information for rev 7

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 4 songching
---- $Author: songching $
2
---- $Date: 2004-04-07 15:38:47 $
3
---- $Revision: 1.1 $
4
----------------------------------------------------------------------
5
---- $Log: not supported by cvs2svn $
6
----------------------------------------------------------------------
7
----
8
---- Copyright (C) 2004 Song Ching Koh, Free Software Foundation, Inc. and OPENCORES.ORG
9
----
10
---- This program is free software; you can redistribute it and/or modify
11
---- it under the terms of the GNU General Public License as published by
12
---- the Free Software Foundation; either version 2 of the License, or
13
---- (at your option) any later version.
14
----
15
---- This program is distributed in the hope that it will be useful,
16
---- but WITHOUT ANY WARRANTY; without even the implied warranty of
17
---- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18
---- GNU General Public License for more details.
19
----
20
---- You should have received a copy of the GNU General Public License
21
---- along with this program; if not, write to the Free Software
22
---- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
23
 
24
library IEEE;
25
use IEEE.STD_LOGIC_1164.ALL;
26
use IEEE.STD_LOGIC_ARITH.ALL;
27
use IEEE.STD_LOGIC_UNSIGNED.ALL;
28
 
29
--  Uncomment the following lines to use the declarations that are
30
--  provided for instantiating Xilinx primitive components.
31
--library UNISIM;
32
--use UNISIM.VComponents.all;
33
 
34
entity MUX1 is
35
    Port ( Input : in std_logic_vector(63 downto 0);
36
           Sel : in std_logic_vector(2 downto 0);
37
           Output : out std_logic_vector(7 downto 0));
38
end MUX1;
39
 
40
architecture mux1_structure of MUX1 is
41
begin
42
        mux: process(Input, Sel)
43
        begin
44
                case SEL is
45
                        when "000" => Output <= Input(7 downto 0);
46
                        when "001" => Output <= Input(15 downto 8);
47
                        when "010" => Output <= Input(23 downto 16);
48
                        when "011" => Output <= Input(31 downto 24);
49
                        when "100" => Output <= Input(39 downto 32);
50
                        when "101" => Output <= Input(47 downto 40);
51
                        when "110" => Output <= Input(55 downto 48);
52
                        when others => Output <= Input(63 downto 56);
53
                end case;
54
        end process mux;
55
end mux1_structure;

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.