module yang(
input [3 :0] bn,
output reg[7:0] segcode,
output [3:0] an
);
assign an=4'b0111;
initial
begin
end
always @(bn)
case(bn)
0:segcode=8'b11000000;//0
1:segcode=8'b11111001;//1
2:segcode=8'b10100100;//2
3:segcode=8'b10110000;//3
4:segcode=8'b10011001;//4
5:segcode=8'b10010010;//5
6:segcode=8'b10000010;//6
7:segcode=8'b11111000;//7
8:segcode=8'b10000000;//8
9:segcode=8'b10010000;//9
'ha:segcode=8'b10001000;//a
'hb:segcode=8'b10000011;//b
'hc:segcode=8'b11000110;//c
'hd:segcode=8'b10100001;//d
'he:segcode=8'b10000110;//e
'hf:segcode=8'b10001110;//f
default:segcode=8'b11111111;
endcase
endmodule
NET "bn<0>" LOC="P11";
NET "bn<1>" LOC="L3";
NET "bn<2>" LOC="K3";
NET "bn<3>" LOC="B4";
NET "an<0>" LOC="F12";
NET "an<1>" LOC="J12";
NET "an<2>" LOC="M13";
NET "an<3>" LOC="K14";
NET "segcode<7>" LOC="N13";
NET "segcode<6>" LOC="M12";
NET "segcode<5>" LOC="L13";
NET "segcode<4>" LOC="P12";
NET "segcode<3>" LOC="N11";
NET "segcode<2>" LOC="N14";
NET "segcode<1>" LOC="H12";
NET "segcode<0>" LOC="L14";