Carry: PROCESS(A, B, Cin) BEGIN IF (A = '1' and B = '1') THEN Cout <= '1'; ELSIF (A = '1' and Cin = '1') THEN Cout <= '1'; ELSIF (B = '1' and Cin = '1') THEN Cout <= '1'; ELSE Cout <= '0'; END IF; END PROCESS Carry;