2位全加器

module top;
  integer ia[1:0],ib[1:0];
  integer icin;
  reg [1:0]a,b;
  reg cin;
  wire cout;
  wire [1:0]sum;

 add_behavioral add2(cout,sum,a,b,cin);

  initial
    begin
      for (ia[0]=0; ia[0]<=1; ia[0] = ia[0]+1)
        begin
          a[0]= ia[0];
          for (ia[1]=0; ia[1]<=1; ia[1] = ia[1]+ 1)
            begin
              a[1] = ia[1];
               for (ib[0]=0; ib[0]<=1; ib[0] = ib[0]+1)
                 begin
                   b[0] = ib[0];
                    for (ib[1]=0; ib[1]<=1; ib[1] = ib[1]+ 1)
                     begin
                      b[1] = ib[1];
                        for (icin=0; icin<=1; icin = icin + 1)
                       begin
                        cin = icin;
                 #1 $display("a[0]=%d a[1]=%d b[0]=%d b[1]=%d sum[0]=%d sum[1]=%d cout=%d cin=%d ",a[0],a[1],b[0],b[1],sum[0],sum[1],cout,cin);
                      end
                    end
                  end
              end
         end
    end
endmodule

module add_behavioral(cout,sum,a,b,cin);
 output [1:0]sum;
 output cout;
 input [1:0] a,b;
 input cin;
 wire t;

add1 a1(t,sum[0],a[0],b[0],cin);
add1 a2(cout,sum[1],a[1],b[1],t);

endmodule

module add1(cout,sum,a,b,cin);
 output cout,sum;
 input a,b,cin;
 wire a,b,cin;
 reg cout,sum;

always @(a or b or cin)
 begin
   cout = (cin & (a^b)) | (a&b);
   sum =  (cin ^(a^b));
 end

endmodule