verilog 中的冒泡排序法

源代码：

module maopao9_test(a1,a2,a3,a4,a5,a6,a7,a8,a9,o1,o2,o3,o4,o5,o6,o7,o8,o9);
input [3:0]a1,a2,a3,a4,a5,a6,a7,a8,a9;
output[3:0]o1,o2,o3,o4,o5,o6,o7,o8,o9;
reg   [3:0]o1,o2,o3,o4,o5,o6,o7,o8,o9;
task px;
    integer i,j;
    input [3:0] b1,b2,b3,b4,b5,b6,b7,b8,b9;
    output [3:0] d1,d2,d3,d4,d5,d6,d7,d8,d9;
    reg [3:0]q[8:0];
    reg [3:0]r;
begin
    q[0]=b1;q[1]=b2;q[2]=b3;q[3]=b4;q[4]=b5;q[5]=b6;q[6]=b7;q[7]=b8;q[8]=b9;
    for(i=0;i<8;i=i+1)
    begin
    for(j=i+1;j<9;j=j+1)
    if(q[i]>q[j])
    begin
    r=q[i];
    q[i]=q[j];
    q[j]=r;
    end
    end
    d1=q[0];d2=q[1];d3=q[2];d4=q[3];d5=q[4];d6=q[5];d7=q[6];d8=q[7];d9=q[8];
end
endtask
always @(*)
px(a1,a2,a3,a4,a5,a