flop : process (clk) is
begin
    if (rising_edge(clk)) then
        q <= d;
    end if;
end process flop;