Complete Architecture

ARCHITECTURE example OF Full_Adder IS
    --Nothing needed in declarative block...
BEGIN

 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;

END Example;