22 lines
358 B
Coq
22 lines
358 B
Coq
|
|
module main;
|
||
|
|
|
||
|
|
reg out, c, a, b;
|
||
|
|
|
||
|
|
initial begin
|
||
|
|
c = 0;
|
||
|
|
a = 0;
|
||
|
|
b = 1;
|
||
|
|
out = c ? (a & b) : b;
|
||
|
|
|
||
|
|
$display("%b = %b ? (%b & %b) : %b;", out, c, a, b, b);
|
||
|
|
if (out !== 1) begin
|
||
|
|
$display("FAILED -- out=%b result is incorrect!", out);
|
||
|
|
$finish;
|
||
|
|
end
|
||
|
|
|
||
|
|
$display("PASSED");
|
||
|
|
$finish;
|
||
|
|
end
|
||
|
|
|
||
|
|
endmodule // main
|