Subversion Repositories cic_core

`timescale 1ns / 1ns

package cmath;

    import "DPI-C" function real sin(input real x);

endpackage

module cic_d_tb

(

);

localparam R = 25;

localparam idw = 16;

localparam odw = 16;

localparam M = 4;

localparam G = 1;

/*************************************************************/

localparam real Fs = 100;//MHz

localparam real T_ns = 10**3/Fs;//ns

localparam time half_T = T_ns/2;

localparam real f = 0.5;//MHz

localparam real f_inc = f/Fs;

localparam bias = 5;

real f_n = 0.0;

/*************************************************************/

reg                     clk;

reg                     reset_n;

reg signed[idw-1:0]     filter_in;

wire                    filter_valid;

wire signed[odw-1:0]    filter_out;

/*************************************************************/

import cmath::*;

/*************************************************************/

initial begin : clk_gen

  clk <= 1'b0;

  #half_T forever #half_T clk = ~clk;

end

/*************************************************************/

initial begin : reset_gen

  $display($time, " << Starting the Simulation >>");

  reset_n = 1'b0;

  repeat (2) @(negedge clk);

  $display($time, " << Coming out of reset >>");

  reset_n = 1'b1;

  repeat (20) @(posedge clk);

  @(posedge clk);

end

/*************************************************************/

always @(posedge clk)

begin

    f_n = f_n + f_inc;

end

/*************************************************************/

assign filter_in = $rtoi((2**(idw-1)-1)*($sin(f_n)));

/*************************************************************/

cic_d #(idw,odw,R,M,G) dut1

(

    .clk(clk),

    .reset_n(reset_n),

    .data_in(filter_in),

    .data_out(filter_out),

    .out_dv(filter_valid)

);

/*************************************************************/

endmodule