Line 23... |
Line 23... |
//
|
//
|
////////////////////////////////////////////////////////////////////////////////
|
////////////////////////////////////////////////////////////////////////////////
|
//
|
//
|
// Copyright (C) 2015-2018, Gisselquist Technology, LLC
|
// Copyright (C) 2015-2018, Gisselquist Technology, LLC
|
//
|
//
|
// This program is free software (firmware): you can redistribute it and/or
|
// This file is part of the general purpose pipelined FFT project.
|
// modify it under the terms of the GNU General Public License as published
|
//
|
// by the Free Software Foundation, either version 3 of the License, or (at
|
// The pipelined FFT project is free software (firmware): you can redistribute
|
// your option) any later version.
|
// it and/or modify it under the terms of the GNU Lesser General Public License
|
//
|
// as published by the Free Software Foundation, either version 3 of the
|
// This program is distributed in the hope that it will be useful, but WITHOUT
|
// License, or (at your option) any later version.
|
// ANY WARRANTY; without even the implied warranty of MERCHANTIBILITY or
|
//
|
// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
// The pipelined FFT project is distributed in the hope that it will be useful,
|
// for more details.
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
//
|
// MERCHANTIBILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser
|
// You should have received a copy of the GNU General Public License along
|
// General Public License for more details.
|
// with this program. (It's in the $(ROOT)/doc directory, run make with no
|
//
|
// target there if the PDF file isn't present.) If not, see
|
// You should have received a copy of the GNU Lesser General Public License
|
|
// along with this program. (It's in the $(ROOT)/doc directory. Run make
|
|
// with no target there if the PDF file isn't present.) If not, see
|
// <http://www.gnu.org/licenses/> for a copy.
|
// <http://www.gnu.org/licenses/> for a copy.
|
//
|
//
|
// License: GPL, v3, as defined and found on www.gnu.org,
|
// License: LGPL, v3, as defined and found on www.gnu.org,
|
// http://www.gnu.org/licenses/gpl.html
|
// http://www.gnu.org/licenses/lgpl.html
|
//
|
//
|
//
|
//
|
////////////////////////////////////////////////////////////////////////////////
|
////////////////////////////////////////////////////////////////////////////////
|
//
|
//
|
//
|
//
|
`default_nettype none
|
`default_nettype none
|
//
|
//
|
module bimpy(i_clk, i_ce, i_a, i_b, o_r);
|
module bimpy(i_clk, i_ce, i_a, i_b, o_r);
|
parameter BW=18, // Number of bits in i_b
|
parameter BW=18; // Number of bits in i_b
|
LUTB=2; // Number of bits in i_a for our LUT multiply
|
localparam LUTB=2; // Number of bits in i_a for our LUT multiply
|
input i_clk, i_ce;
|
input wire i_clk, i_ce;
|
input [(LUTB-1):0] i_a;
|
input wire [(LUTB-1):0] i_a;
|
input [(BW-1):0] i_b;
|
input wire [(BW-1):0] i_b;
|
output reg [(BW+LUTB-1):0] o_r;
|
output reg [(BW+LUTB-1):0] o_r;
|
|
|
wire [(BW+LUTB-2):0] w_r;
|
wire [(BW+LUTB-2):0] w_r;
|
wire [(BW+LUTB-3):1] c;
|
wire [(BW+LUTB-3):1] c;
|
|
|
assign w_r = { ((i_a[1])?i_b:{(BW){1'b0}}), 1'b0 }
|
assign w_r = { ((i_a[1])?i_b:{(BW){1'b0}}), 1'b0 }
|
^ { 1'b0, ((i_a[0])?i_b:{(BW){1'b0}}) };
|
^ { 1'b0, ((i_a[0])?i_b:{(BW){1'b0}}) };
|
assign c = { ((i_a[1])?i_b[(BW-2):0]:{(BW-1){1'b0}}) }
|
assign c = { ((i_a[1])?i_b[(BW-2):0]:{(BW-1){1'b0}}) }
|
& ((i_a[0])?i_b[(BW-1):1]:{(BW-1){1'b0}});
|
& ((i_a[0])?i_b[(BW-1):1]:{(BW-1){1'b0}});
|
|
|
|
initial o_r = 0;
|
always @(posedge i_clk)
|
always @(posedge i_clk)
|
if (i_ce)
|
if (i_ce)
|
o_r <= w_r + { c, 2'b0 };
|
o_r <= w_r + { c, 2'b0 };
|
|
|
|
`ifdef FORMAL
|
|
reg f_past_valid;
|
|
|
|
initial f_past_valid = 1'b0;
|
|
always @(posedge i_clk)
|
|
f_past_valid <= 1'b1;
|
|
|
|
`define ASSERT assert
|
|
|
|
always @(posedge i_clk)
|
|
if ((f_past_valid)&&($past(i_ce)))
|
|
begin
|
|
if ($past(i_a)==0)
|
|
`ASSERT(o_r == 0);
|
|
else if ($past(i_a) == 1)
|
|
`ASSERT(o_r == $past(i_b));
|
|
|
|
if ($past(i_b)==0)
|
|
`ASSERT(o_r == 0);
|
|
else if ($past(i_b) == 1)
|
|
`ASSERT(o_r[(LUTB-1):0] == $past(i_a));
|
|
end
|
|
`endif
|
endmodule
|
endmodule
|
|
|
No newline at end of file
|
No newline at end of file
|