DA 09.02.26
ALU 4 bit ver.1 nahrada SN7483
device 16v8

c0	1	'carry in
a1	2	'A operand
a2	3
a3	4
a4	5
b1	6	'B operand
b2	7
b3	8
b4	9
gnd     10
/oe     11	'zatim nepouzito 
s4	12	'S suma
s3	13
s2	14
s1	15
c1	16	'C carry
c2	17
c3	18
c4	19
vcc     20

start

s1	=/c0*/b1* a1 
	+/c0* b1*/a1
	+ c0*/b1*/a1
	+ c0* b1* a1;

c1	=     b1* a1
	+ c0* b1*/a1
	+ c0*/b1* a1;

s2	=/c1*/b2* a2 
	+/c1* b2*/a2
	+ c1*/b2*/a2
	+ c1* b2* a2;

c2	=     b2* a2
	+ c1* b2*/a2
	+ c1*/b2* a2;

s3	=/c2*/b3* a3 
	+/c2* b3*/a3
	+ c2*/b3*/a3
	+ c2* b3* a3;

c3	=     b3* a3
	+ c2* b3*/a3
	+ c2*/b3* a3;

s4	=/c3*/b4* a4 
	+/c3* b4*/a4
	+ c3*/b4*/a4
	+ c3* b4* a4;

c4	=     b4* a4
	+ c3* b4*/a4
	+ c3*/b4* a4;

end