












































































Study with the several resources on Docsity
Earn points by helping other students or get them with a premium plan
Prepare for your exams
Study with the several resources on Docsity
Earn points to download
Earn points by helping other students or get them with a premium plan
These are the Lecture Slides of Aided Circuit Design which includes Vhdl Model, Aliases for Data Objects, Alias Declaration, Type Register, Arguments of Different Length, Aliases for Non-Data Items, Type Alias, Literal Alias, Procedure Alias etc.Key important points are: Basic Modeling Constructs, Entity Declaration, Entity Adder, Default Values, Architecture Bodies, Internal Operations, Concurrent Statements, Process Statements, Signal Declarations
Typology: Slides
1 / 84
This page cannot be seen from the preview
Don't miss anything!













































































entity adder is port ( a : in word; b : in word; sum : out word ); end entity adder; entity adder is port ( a, b : in word; sum : out word ); end entity adder;
library ieee; use ieee.std_logic_1164.all; entity program_ROM is port ( address : in std_ulogic_vector(14 downto 0); data : out std_ulogic_vector(7 downto 0); enable : in std_ulogic ); subtype instruction_byte is bit_vector(7 downto 0); type program_array is array (0 to 2**14 - 1) of instruction_byte; constant program : program_array := ( X"32", X"3F", X"03", -- LDA $3F X"71", X"23", -- BLT $ others => X"00" --... ); end entity program_ROM;
architecture primitive of and_or_inv is signal and_a, and_b : bit; signal or_a_b : bit; begin and_gate_a : process (a1, a2) is begin and_a <= a1 and a2; end process and_gate_a; and_gate_b : process (b1, b2) is begin and_b <= b1 and b2; end process and_gate_b; or_gate : process (and_a, and_b) is begin or_a_b <= and_a or and_b; end process or_gate; inv : process (or_a_b) is begin y <= not or_a_b; end process inv; end architecture primitive;
mux : process (a, b, sel) is begin case sel is when '0' => z <= a after prop_delay; when '1' => z <= b after prop_delay; end case; end process mux;
if clk'event and (clk = '1' or clk = 'H') and (clk'last_value = '0' or clk'last_value = 'L') then assert d'last_event >= Tsu report "Timing error: d changed within setup time of clk"; end if;
entity mux2 is
port ( a, b, sel : in bit; z : out bit );
end entity mux2;
architecture behavioral of mux2 is
constant prop_delay : time := 2 ns;
begin
slick_mux : process is begin case sel is when '0' => z <= a after prop_delay; wait on sel, a; when '1' => z <= b after prop_delay; wait on sel, b; end case; end process slick_mux;
end architecture behavioral; Docsity.com