MODULE BCD_TO_SEVEN_SEGMENT
" TOOL:     ispDesignExpert
" DATE:     2000.10.28 
" FILENAME: bcd_to_seven_segment.abv
" PROJECT:  bcd_to_7seg
" VERSION:  8.1
" Inputs
    A_0_ pin;
    A_1_ pin;
    A_2_ pin;
    A_3_ pin;
" Outputs
    SEGMENTS_0_ pin;
    SEGMENTS_1_ pin;
    SEGMENTS_2_ pin;
    SEGMENTS_3_ pin;
    SEGMENTS_4_ pin;
    SEGMENTS_5_ pin;
    SEGMENTS_6_ pin;
zero 	= [1,1,1,1,1,1,0];
one	= [0,1,1,0,0,0,0];
two	= [1,1,0,1,1,0,1];
three	= [1,1,1,1,0,0,1];
four	= [0,1,1,0,0,1,1];
five	= [1,0,1,1,0,1,1];
six	= [1,0,1,1,1,1,1];
seven	= [1,1,1,0,0,0,0];
eight	= [1,1,1,1,1,1,1];
nine	= [1,1,1,1,0,1,1];
Test_vectors
([A_0_,A_1_,A_2_,A_3_] -> [SEGMENTS_0_,SEGMENTS_1_,SEGMENTS_2_,SEGMENTS_3_,SEGMENTS_4_,SEGMENTS_5_,SEGMENTS_6_])
	[0,0,0,0]->zero;
	[1,0,0,0]->one;
	[0,1,0,0]->two;
	[1,1,0,0]->three;
	[0,0,1,0]->four;
	[1,0,1,0]->five;
	[0,1,1,0]->six;
	[1,1,1,0]->seven;
	[0,0,0,1]->eight;
	[1,0,0,1]->nine;
END BCD_TO_SEVEN_SEGMENT