- moved real_array_t to fixed_util_pkg
git-svn-id: http://moon:8086/svn/vhdl/trunk@181 cc03376c-175c-47c8-b038-4cd826a8556b
This commit is contained in:
@@ -26,12 +26,10 @@ package cordic_pkg is
|
|||||||
|
|
||||||
constant max_iteration : integer := 80;
|
constant max_iteration : integer := 80;
|
||||||
|
|
||||||
type real_tbl_t is array (natural range <>) of real;
|
|
||||||
|
|
||||||
-- Normalized Arctan table (for phases z = -1..+1)
|
-- Normalized Arctan table (for phases z = -1..+1)
|
||||||
-- MatLab command: arctan_tbl = (atan(2.^-(0:N-1))/pi)'
|
-- MatLab command: arctan_tbl = (atan(2.^-(0:N-1))/pi)'
|
||||||
-- (Print format: long e, compact)
|
-- (Print format: long e, compact)
|
||||||
constant arctan_tbl : real_tbl_t (0 to max_iteration-1) :=
|
constant arctan_tbl : real_array_t (0 to max_iteration-1) :=
|
||||||
(
|
(
|
||||||
2.500000000000000e-001,
|
2.500000000000000e-001,
|
||||||
1.475836176504333e-001,
|
1.475836176504333e-001,
|
||||||
@@ -118,7 +116,7 @@ package cordic_pkg is
|
|||||||
-- Gain correction table
|
-- Gain correction table
|
||||||
-- MatLab command: gain_tbl = (1./cumprod(sqrt(1+2.^-(2*(0:N-1)))))'
|
-- MatLab command: gain_tbl = (1./cumprod(sqrt(1+2.^-(2*(0:N-1)))))'
|
||||||
-- (Print format: long e, compact)
|
-- (Print format: long e, compact)
|
||||||
constant gain_tbl : real_tbl_t (0 to max_iteration-1) :=
|
constant gain_tbl : real_array_t (0 to max_iteration-1) :=
|
||||||
(
|
(
|
||||||
7.071067811865475e-001,
|
7.071067811865475e-001,
|
||||||
6.324555320336759e-001,
|
6.324555320336759e-001,
|
||||||
|
|||||||
Reference in New Issue
Block a user