Subversion Repositories pairing

`timescale 1ns / 1ps

module test_f3_mult;

        // Inputs

        reg [1:0] A;

        reg [1:0] B;

        // Outputs

        wire [1:0] C;

        // Instantiate the Unit Under Test (UUT)

        f3_mult uut (

                .A(A),

                .B(B),

                .C(C)

        );

   task check;

          begin

         #10;

                        if ((A*B) % 3 != C)

                           begin

                                   $display("Error"); $finish;

                                end

          end

        endtask

        initial begin

                // Initialize Inputs

                A = 0;

                B = 0;

                // Wait 100 ns for global reset to finish

                #100;

                // Add stimulus here

                A = 0; B = 0; check;

                A = 0; B = 1; check;

                A = 0; B = 2; check;

                A = 1; B = 0; check;

                A = 1; B = 1; check;

                A = 1; B = 2; check;

                A = 2; B = 0; check;

                A = 2; B = 1; check;

                A = 2; B = 2; check;

                $finish;

        end

endmodule