entity D_FF is port ( cp : in bit; D : in bit; Q : out bit );end D_FF;architecture one of D_FF isbegin process(cp) begin if(cp'event and cp='1') then Q<=D; end if; end process;end one;