From 55a702d6bd5a4b4e2f0e6ae5e7b26a4227d93314 Mon Sep 17 00:00:00 2001 From: Jens Ahrensfeld Date: Fri, 2 Jan 2009 16:07:16 +0000 Subject: [PATCH] - moved real_array_t to fixed_util_pkg git-svn-id: http://moon:8086/svn/vhdl/trunk@181 cc03376c-175c-47c8-b038-4cd826a8556b --- lib/radio/cordic/src/cordic_pkg.vhd | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lib/radio/cordic/src/cordic_pkg.vhd b/lib/radio/cordic/src/cordic_pkg.vhd index 8dbd116..d26d2b6 100644 --- a/lib/radio/cordic/src/cordic_pkg.vhd +++ b/lib/radio/cordic/src/cordic_pkg.vhd @@ -26,12 +26,10 @@ package cordic_pkg is constant max_iteration : integer := 80; - type real_tbl_t is array (natural range <>) of real; - -- Normalized Arctan table (for phases z = -1..+1) -- MatLab command: arctan_tbl = (atan(2.^-(0:N-1))/pi)' -- (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, 1.475836176504333e-001, @@ -118,7 +116,7 @@ package cordic_pkg is -- Gain correction table -- MatLab command: gain_tbl = (1./cumprod(sqrt(1+2.^-(2*(0:N-1)))))' -- (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, 6.324555320336759e-001,