ENTITY prioridade IS
  PORT (p0, p1, p2, p3 : IN BIT;
          x0, x1, int    : OUT BIT);
END prioridade;

ARCHITECTURE teste OF prioridade IS
    SIGNAL sel: BIT_VECTOR(3 DOWNTO 0);
BEGIN
    sel <= p0 & p1 & p2 & p3;
    abc: PROCESS (sel)
    BEGIN
        CASE sel IS
            WHEN "0001"             => x1 <= '1' ; x0 <= '1'; int <= '1';
            WHEN "0010" | "0011"   => x1 <= '1' ; x0 <= '0'; int <= '1';
            WHEN "0100" | "0101" | "0110" | "0111" => x1 <= '0' ; x0 <= '1'; int <= '1';
            WHEN "1000" | "1001" | "1010" | "1011" | "1100" | "1101" | "1110" | "1111" => x1 <= '0' ; x0 <= '0'; int <= '1';
            WHEN OTHERS => x1 <= '1' ; x0 <= '1'; int <= '0';
        END CASE;
    END PROCESS abc;
END teste;