Subversion Repositories isqrt_dbd

timeunit 1ns;

timeprecision 1ns;

module isqrt_dbd_tb;

        bit clk = 0;

        bit [31:0] data = 0;

        wire [15:0] q;

        always #10ns clk++;

        initial begin

                repeat(10) @(posedge clk);

                Test(32'd241125431);

                repeat(10) @(posedge clk);

                $stop(2);

        end

        isqrt_dbd dut(.*);

        task Test(bit [31:0] value);

                int q_ref;

                data = value;

                repeat(100) @(posedge clk);

                q_ref = longint'($sqrt(value));

                $display("x = %d, rtl: %d, ref: %d", value, q, q_ref);

        endtask

endmodule :isqrt_dbd_tb