12/2期末上機考-練習

module top;

wire A,B,C,D,F;
system_clock #1600 clock1(A);
system_clock #800 clock2(B);
system_clock #400 clock3(C);
system_clock #200 clock4(D);

not z1(a, A);
not z2(b, B);
not z3(c, C);
not z4(d, D);
and x1(F1, C, D);
and x2(F2, a, b, D);
and x3(F3, B, c, d);
and x4(F4, A, c, d);
or W(F, F1, F2, F3, F4);

endmodule

module system_clock(clk);
parameter PERIOD=100;
output clk;
reg clk;

initial clk=0;

always
 begin
#(PERIOD/2) clk=~clk;
 end

always@(posedge clk)
 if($time>3200)$stop;

endmodule