-- Seule la partie description du code ci-dessus est modifiée
architecture COMPORT of COMPARATEUR1bit
begin
    S <= '1' when A=B else '0'; -- C'est intuitif, concis et clair !
end COMPORT;