module top();
reg foo;
reg bar;
tri [1:0] a;
tri [1:0] b;
assign a[0] = foo;
assign b[1] = bar;
tran t[1:0](a, b);
initial begin
foo = 1'b1;
bar = 1'b0;
#1 $display("%b %b", a, b);
if ((a === 2'b01) && (b === 2'b01))
$display("PASSED");
else
$display("FAILED");
end
endmodule