`timescale 1ns/100ps module testbench; localparam DATA_W
H = 32; localparam CLK_100_PERIOD = 5; localparam CLK_200_PERIOD = 2.5; localparam SIM_
ME = 150000; localparam ; localparam ; reg clk_100, clk_200; wire clk; assign clk = clk_100; always begin clk_100 = 0; forever #CLK_100_PERIOD clk_100 = ~clk_100; end always begin clk_200 = 0; forever #CLK_200_PERIOD clk_200 = ~clk_200; end reg rstn; integer fp_testin; integer fp_matlab_out; integer fp_sim_out; integer fp_outdiff; reg signed [DATA_WIDTH/2-1:0] matlab_in_re, matlab_in_im; reg signed [DATA_WIDTH/2-1:0] matlab_out_re, matlab_out_im; reg signed [DATA_WIDTH/2-1:0] matlab_diff_re, matlab_diff_im; reg signed [DATA_WIDTH/2-1:0] matlab_diff_re2, matlab_diff_im2; reg signed [DATA_WIDTH/2-1:0] max_diff_re, max_diff_im; initial begin max_diff_re = 0; max_diff_im = 0; rstn = 0; #500 rstn = 1; #SIM_TIME sim_finish(); $stop(); end task sim_finish; begin if(fp_testin!=0) $fclose(fp_testin); if(fp_matlab_out!=0) $fclose(fp_matlab_out); if(fp_sim_out) $fclose(fp_sim_out); if(fp_outdiff!=0) $fclose(fp_outdiff); end endtask initial begin fp_testin = 0; fp_testin= $fopen("txt_file/input_data.txt","r"); if(fp_testin==0) begin $display("input_data.txt open failed!"); sim_finish(); $stop(); end else begin $fscanf(fp_testin, "%d, %d\n",matlab_in_re,matlab_in_im); end fp_matlab_out = 0; fp_matlab_out = $fopen("txt_file/matlab_out.txt","r"); if(fp_matlab_out==0) begin $display("fp_matlab_out.txt open failed!"); sim_finish(); $stop(); end else begin $fscanf(fp_matlab_out,"%d, %d\n",matlab_out_re,matlab_out_im); end fp_sim_out = 0; fp_sim_out = $fopen("txt_file/modelsim_out.txt","w"); if(fp_sim_out == 0) begin $display("modelsim_out_re.txt open failed!"); sim_finish(); $stop(); end fp_outdiff = 0; fp_outdiff = $fopen("text_file/outdiff.txt","w"); if(fp_outdiff==0) begin $display("outdiff.txt open failed!"); sim_finish(); $stop(); end end always @(posedge clk) begin if(stest_wvalid && stest_wready) //ready to change begin if(~$feof(fp_testin)) $fscanf(fp_testin, "%d, %d\n",matlab_in_re,matlab_in_im); end else begin matlab_in_re <= matlab_in_re; matlab_in_im <= matlab_in_im; end end always @(posedge clk_100) begin if(mfc_wready && mfc_wvalid) begin matlab_diff_re <= mfc_wdata_re - matlab_out_re; matlab_diff_im <= mfc_wdata_im - matlab_out_im; matlab_diff_re2 <= matlab_out_re - mfc_wdata_re ; matlab_diff_im2 <= matlab_out_im - mfc_wdata_im ; if(max_diff_re < matlab_diff_re) begin max_diff_re <= matlab_diff_re; $display("max_diff_re:%d max_diff_im:%d\n",max_diff_re,max_diff_im); end else if(max_diff_re < matlab_diff_re2) begin max_diff_re <= matlab_diff_re2; $display("max_diff_re:%d max_diff_im:%d\n",max_diff_re,max_diff_im); end if(max_diff_im < matlab_diff_im) begin max_diff_im <= matlab_diff_im; $display("max_diff_re:%d max_diff_im:%d\n",max_diff_re,max_diff_im); end else if(max_diff_im < matlab_diff_im2) begin max_diff_im <= matlab_diff_im2; $display("max_diff_re:%d max_diff_im:%d\n",max_diff_re,max_diff_im); end $fscanf(fp_matlab_out,"%d, %d\n",matlab_out_re,matlab_out_im); $fwrite(fp_sim_out, "%d, %d\n", mfc_wdata_re,mfc_wdata_im); $fwrite(fp_outdiff, "%d, %d\n",matlab_diff_re,matlab_diff_im); end end endmodule
-电子元器件采购网（www.ruidan.com）是本土元器件目录分销商，采用“小批量、现货、样品”销售模式，致力于满足客户多型号、高质量、快速交付的采购需求。
自建高效智能仓储，拥有自营库存超过50,000种，提供一站式正品现货采购、个性化解决方案、选型替代等多元化服务。