Subversion Repositories thor

module redor32

(

        input [4:0] a,

        input [31:0] b,

        output reg o

);

        always @(a,b)

        case (a)

        5'd0:   o =  b[0];

        5'd1:   o = |b[1:0];

        5'd2:   o = |b[2:0];

        5'd3:   o = |b[3:0];

        5'd4:   o = |b[4:0];

        5'd5:   o = |b[5:0];

        5'd6:   o = |b[6:0];

        5'd7:   o = |b[7:0];

        5'd8:   o = |b[8:0];

        5'd9:   o = |b[9:0];

        5'd10:  o = |b[10:0];

        5'd11:  o = |b[11:0];

        5'd12:  o = |b[12:0];

        5'd13:  o = |b[13:0];

        5'd14:  o = |b[14:0];

        5'd15:  o = |b[15:0];

        5'd16:  o = |b[16:0];

        5'd17:  o = |b[17:0];

        5'd18:  o = |b[18:0];

        5'd19:  o = |b[19:0];

        5'd20:  o = |b[20:0];

        5'd21:  o = |b[21:0];

        5'd22:  o = |b[22:0];

        5'd23:  o = |b[23:0];

        5'd24:  o = |b[24:0];

        5'd25:  o = |b[25:0];

        5'd26:  o = |b[26:0];

        5'd27:  o = |b[27:0];

        5'd28:  o = |b[28:0];

        5'd29:  o = |b[29:0];

        5'd30:  o = |b[30:0];

        5'd31:  o = |b[31:0];

        endcase

endmodule