-- Código flip-flop
Entity ff is port

( d, ck:in bit;
q:out bit);

end;
Architecture func of ff is
begin

process (ck)
begin

if ck'event and ck='1' then
q <= d after 0.5 ns;

end process;

end;


WcN - Joan Oliver. Diseño de circuitos digitales con VHDL