这段程序是不是实现4位二进制加法？？请各位指点一下，谢谢

module fast_adder4b(A,B,Cin,Sum,Cout);
input [3:0]A;
input [3:0]B;
input Cin;
output [3:0]Sum;
output Cout;

reg [3:0]Sum;
reg Cout;

reg [3:0]p;
reg [3:0]g;
reg [3:0]carrychain;

integer i;

always@(A or B or Cin)
begin
        p=A^B;
        g=A&B;
        carrychain[0]=g[0]|(p[0]&Cin);
        Sum[0]=p[0]^Cin;
        for(i=1;i<4;i=i+1)
        begin
                carrychain[i]=g[i]|(p[i]&carrychain[i-1]);
                Sum[i]=p[i]^carrychain[i-1];
        end
        Cout=carrychain[3];
end
endmodule

这段程序是不是实现4位二进制加法？？请各位指点一下，谢谢