-- Trabajando con señales y variables
-- Declaración de la entidad
Entity classdat is
port (
in1, in2, in3: in bit; --Declaración de señales de entrada
res1, res2, res3, res4: buffer bit); --Declaración de señales de salida
end classdat ;
-- Definición de la arquitectura
Architecture prueba of classdat is
begin
res2<= res1 and in3 after 1 ns;
res1<= in1 and in2 after 1 ns;
process (in1, in2, in3)
variable int1, int2:bit;
beginint1:=in1 and in2;
int2:=int1 and in3;
res3<=int1 after 3 ns;
res4<=int2 after 3 ns;end process;
end prueba;