Two Full Adder Processes

Summation:
PROCESS(A, B, Cin)
BEGIN
    Sum <= A xor B xor Cin;
END PROCESS Summation;











Carry
PROCESS(A, B, Cin)
BEGIN
    Cout <= (A and B) or
            (A and Cin) or
            (B and Cin);
END PROCESS Carry;