zcy
/
pluto_hdl_adi
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

ad_dds_cordic_pipe.v: Optimize for implementation 

The present changes make better use of the Carry Chain blocks resulting in
fewer FPGA resources being used.
main
AndreiGrozav 2018-02-12 14:14:30 +02:00 committed by AndreiGrozav
parent dc80048733
commit 43f460e744
1 changed files with 17 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
library/common/ad_dds_cordic_pipe.v
View File

@ -47,15 +47,15 @@ module ad_dds_cordic_pipe#(
input clk, input clk,
(* keep = "TRUE" *) input dir, (* keep = "TRUE" *) input dir,
(* keep = "TRUE" *) input signed [ DW-1:0] dataa_x, (* keep = "TRUE" *) input [ DW-1:0] dataa_x,
(* keep = "TRUE" *) input signed [ DW-1:0] dataa_y, (* keep = "TRUE" *) input [ DW-1:0] dataa_y,
(* keep = "TRUE" *) input signed [ DW-1:0] dataa_z, (* keep = "TRUE" *) input [ DW-1:0] dataa_z,
(* keep = "TRUE" *) input signed [ DW-1:0] datab_x, (* keep = "TRUE" *) input [ DW-1:0] datab_x,
(* keep = "TRUE" *) input signed [ DW-1:0] datab_y, (* keep = "TRUE" *) input [ DW-1:0] datab_y,
(* keep = "TRUE" *) input signed [ DW-1:0] datab_z, (* keep = "TRUE" *) input [ DW-1:0] datab_z,
(* keep = "TRUE" *) output reg signed [ DW-1:0] result_x, (* keep = "TRUE" *) output reg [ DW-1:0] result_x,
(* keep = "TRUE" *) output reg signed [ DW-1:0] result_y, (* keep = "TRUE" *) output reg [ DW-1:0] result_y,
(* keep = "TRUE" *) output reg signed [ DW-1:0] result_z, (* keep = "TRUE" *) output reg [ DW-1:0] result_z,
output signed [ DW-1:0] sgn_shift_x, output signed [ DW-1:0] sgn_shift_x,
output signed [ DW-1:0] sgn_shift_y, output signed [ DW-1:0] sgn_shift_y,
input [DELAY_DW:1] data_delay_in, input [DELAY_DW:1] data_delay_in,
@ -66,22 +66,15 @@ module ad_dds_cordic_pipe#(
reg [DELAY_DW:1] data_delay = 'd0; reg [DELAY_DW:1] data_delay = 'd0;
wire dir_inv = ~dir;
// stage rotation // stage rotation
always @(posedge clk) always @(posedge clk)
begin begin
case(dir) result_x <= dataa_x + ({DW{dir_inv}} ^ datab_y) + dir_inv;
1'b0: begin result_y <= dataa_y + ({DW{dir}} ^ datab_x) + dir;
result_x <= dataa_x - datab_y; result_z <= dataa_z + ({DW{dir_inv}} ^ datab_z) + dir_inv;
result_y <= dataa_y + datab_x;
result_z <= dataa_z - datab_z;
end
1'b1: begin
result_x <= dataa_x + datab_y;
result_y <= dataa_y - datab_x;
result_z <= dataa_z + datab_z;
end
endcase
end end
// stage shift // stage shift