Subversion Repositories sha3

/*

 * Copyright 2013, Homer Hsing <homer.hsing@gmail.com>

 *

 * Licensed under the Apache License, Version 2.0 (the "License");

 * you may not use this file except in compliance with the License.

 * You may obtain a copy of the License at

 *

 * http://www.apache.org/licenses/LICENSE-2.0

 *

 * Unless required by applicable law or agreed to in writing, software

 * distributed under the License is distributed on an "AS IS" BASIS,

 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

 * See the License for the specific language governing permissions and

 * limitations under the License.

 */

`timescale 1ns / 1ps

`define P 20

module test_rconst;

    // Inputs

    reg [23:0] i;

    // Outputs

    wire [63:0] rc;

    // Instantiate the Unit Under Test (UUT)

    rconst uut (

        .i(i),

        .rc(rc)

    );

    initial begin

        // Initialize Inputs

        i = 0;

        // Wait 100 ns for global reset to finish

        #100;

        // Add stimulus here

        i=0; i[0] = 1;

        #(`P);

        if(rc !== 64'h1) begin $display("E"); $finish; end

        i=0; i[1] = 1;

        #(`P);

        if(rc !== 64'h8082) begin $display("E"); $finish; end

        i=0; i[2] = 1;

        #(`P);

        if(rc !== 64'h800000000000808a) begin $display("E"); $finish; end

        i=0; i[3] = 1;

        #(`P);

        if(rc !== 64'h8000000080008000) begin $display("E"); $finish; end

        i=0; i[4] = 1;

        #(`P);

        if(rc !== 64'h808b) begin $display("E"); $finish; end

        i=0; i[5] = 1;

        #(`P);

        if(rc !== 64'h80000001) begin $display("E"); $finish; end

        i=0; i[6] = 1;

        #(`P);

        if(rc !== 64'h8000000080008081) begin $display("E"); $finish; end

        i=0; i[7] = 1;

        #(`P);

        if(rc !== 64'h8000000000008009) begin $display("E"); $finish; end

        i=0; i[8] = 1;

        #(`P);

        if(rc !== 64'h8a) begin $display("E"); $finish; end

        i=0; i[9] = 1;

        #(`P);

        if(rc !== 64'h88) begin $display("E"); $finish; end

        i=0; i[10] = 1;

        #(`P);

        if(rc !== 64'h80008009) begin $display("E"); $finish; end

        i=0; i[11] = 1;

        #(`P);

        if(rc !== 64'h8000000a) begin $display("E"); $finish; end

        i=0; i[12] = 1;

        #(`P);

        if(rc !== 64'h8000808b) begin $display("E"); $finish; end

        i=0; i[13] = 1;

        #(`P);

        if(rc !== 64'h800000000000008b) begin $display("E"); $finish; end

        i=0; i[14] = 1;

        #(`P);

        if(rc !== 64'h8000000000008089) begin $display("E"); $finish; end

        i=0; i[15] = 1;

        #(`P);

        if(rc !== 64'h8000000000008003) begin $display("E"); $finish; end

        i=0; i[16] = 1;

        #(`P);

        if(rc !== 64'h8000000000008002) begin $display("E"); $finish; end

        i=0; i[17] = 1;

        #(`P);

        if(rc !== 64'h8000000000000080) begin $display("E"); $finish; end

        i=0; i[18] = 1;

        #(`P);

        if(rc !== 64'h800a) begin $display("E"); $finish; end

        i=0; i[19] = 1;

        #(`P);

        if(rc !== 64'h800000008000000a) begin $display("E"); $finish; end

        i=0; i[20] = 1;

        #(`P);

        if(rc !== 64'h8000000080008081) begin $display("E"); $finish; end

        i=0; i[21] = 1;

        #(`P);

        if(rc !== 64'h8000000000008080) begin $display("E"); $finish; end

        i=0; i[22] = 1;

        #(`P);

        if(rc !== 64'h80000001) begin $display("E"); $finish; end

        i=0; i[23] = 1;

        #(`P);

        if(rc !== 64'h8000000080008008) begin $display("E"); $finish; end

        $display("Good!");

        $finish;

    end

endmodule

`undef P