module test;

    reg [3:0] a;
    reg [31:0] in;
    reg [31:0] i;

    initial begin
        a = 4'b0011;
        in = 10;

        while (a != 0) begin
            a = a - 1;
            in = in - 1;
            for (i=2; i >= 0; i = i - 1) begin
                $display ("%d\n", i);
            end
        end
    end

endmodule