compare2.vhd

来自「VHDL子程序集,包括各种例程资料以及源码.」· VHDL 代码 · 共 53 行

--************************************
--*  Comparator (IF.. THEN .. ELSE)  *
--*        Filename : COMPARE2       *
--************************************

library IEEE;
use IEEE.std_logic_1164.all;

entity COMPARE2 is
    port (
          A:     in STD_LOGIC;
          B:     in STD_LOGIC;
          Large: out STD_LOGIC;
          Small: out STD_LOGIC;
          EQV:   out STD_LOGIC
         );
end COMPARE2;

architecture COMPARE2_arch of COMPARE2 is

begin
process (A,B)

begin
    if A > B then
       Large <= '1';
    else
       Large <= '0';   
    end if;
end process;
    
process (A,B)

begin
    if A < B then
       Small <= '1';
    else
       Small <= '0';   
    end if;    
end process;

process (A,B)

begin
    if A = B then
       EQV <= '1';
    else
       EQV <= '0';   
    end if;    
end process;  
            
end COMPARE2_arch;