{{{
-- Multiplexeur 4 bits

ENTITY mux4 IS
  PORT
    (
      cmd       : IN  BIT;
      x         : IN  BIT_VECTOR(3 downto 0);
      y         : IN  BIT_VECTOR(3 downto 0);
      q         : OUT BIT_VECTOR(3 downto 0);
      vdd       : IN  bit;
      vss       : IN  bit);
END mux4;

ARCHITECTURE vbe OF mux4 IS

BEGIN

WITH cmd SELECT
  q <= x WHEN "0",
       y WHEN "1";

END;
}}}