Subversion Repositories or1k_old

// $Header: /home/marcus/revision_ctrl_test/oc_cvs/cvs/or1k/mp3/lib/xilinx/unisims/OFDTI_F.v,v 1.1.1.1 2001-11-04 18:59:50 lampret Exp $
 
/*
 
FUNCTION	: Output D-FLIP-FLOP
 
*/
 
`timescale  100 ps / 10 ps
 
`celldefine
 
module OFDTI_F (O, C, D, T);
 
    parameter cds_action = "ignore";
    parameter INIT = 1'b1;
 
    output O;
    reg    o_in;
 
    input  C, D, T;
 
    tri0 GSR = glbl.GSR;
    tri0 GTS = glbl.GTS;
 
	always @(GSR)
	    if (GSR)
		assign o_in = INIT;
	    else
		deassign o_in;
 
	always @(posedge C)
	    o_in <= D;
 
    or (t_in, GTS, T);
    bufif0 (O, o_in, t_in);
 
    specify
	(posedge C => (O +: D)) = (1, 1);
	(T => O) = (1, 1, 0);
    endspecify
 
endmodule
 
`endcelldefine