Fr 26. Sep 10:59:59 CEST 2025/quine420250913.vhdl

-- (C) David Vajda
-- Sat Sep 13 08:27:42 2025
-- 4 Network - TTL - Disjunktive Normalform

library ieee;
use ieee.std_logic_1164.all;

entity quine20250913 is
port (
        x3, x2, x1, x0: in std_logic;
        y: out std_logic
);
end;

architecture behaviour of quine20250913 is
begin
    y   <=  (not x3 and x2 and not x1) or
            (not x3 and not x1 and not x0) or
            (not x2 and x1 and not x0) or
            (x2 and not x1 and not x0);
end;

library ieee;
use ieee.std_logic_1164.all;

entity quine20250913testbench is
port (
        y: out std_logic
);
end;

architecture behaviour of quine20250913testbench is
        component quine20250913
        port (
                x3, x2, x1, x0: in std_logic;
                y: out std_logic
        );
        end component;
        signal x3, x2, x1, x0: std_logic;
begin
        q: quine20250913 PORT MAP (x3=>x3, x2=>x2, x1=>x1, x0=>x0, y=>y);


        x0 <= '0' after 0 ns, '1' after 10 ns, '0' after 20 ns, '1' after 30 ns, '0' after 40 ns, '1' after 50 ns, '0' after 60 ns, '1' after 70 ns, '0' after 80 ns, '1' after 90 ns, '0' after 100 ns, '1' after 110 ns, '0' after 120 ns, '1' after 130 ns, '0' after 140 ns, '1' after 150 ns;

        x1 <= '0' after 0 ns, '0' after 10 ns, '1' after 20 ns, '1' after 30 ns, '0' after 40 ns, '0' after 50 ns, '1' after 60 ns, '1' after 70 ns, '0' after 80 ns, '0' after 90 ns, '1' after 100 ns, '1' after 110 ns, '0' after 120 ns, '0' after 130 ns, '1' after 140 ns, '1' after 150 ns;

        x2 <= '0' after 0 ns, '0' after 10 ns, '0' after 20 ns, '0' after 30 ns, '1' after 40 ns, '1' after 50 ns, '1' after 60 ns, '1' after 70 ns, '0' after 80 ns, '0' after 90 ns, '0' after 100 ns, '0' after 110 ns, '1' after 120 ns, '1' after 130 ns, '1' after 140 ns, '1' after 150 ns;

        x3 <= '0' after 0 ns, '0' after 10 ns, '0' after 20 ns, '0' after 30 ns, '0' after 40 ns, '0' after 50 ns, '0' after 60 ns, '0' after 70 ns, '1' after 80 ns, '1' after 90 ns, '1' after 100 ns, '1' after 110 ns, '1' after 120 ns, '1' after 130 ns, '1' after 140 ns, '1' after 150 ns;
end;