diff --git a/lib/radio/nco/src/nco_pkg.vhd b/lib/radio/nco/src/nco_pkg.vhd index 6c0f5f6..c8d3f42 100644 --- a/lib/radio/nco/src/nco_pkg.vhd +++ b/lib/radio/nco/src/nco_pkg.vhd @@ -11,11 +11,6 @@ package nco_pkg is constant tpd : time := 0 ns; - -- Global set arithmetic rounding mode --- constant pi : real := 3.141592653589793e+000; --- constant sqrt2 : real := 1.414213562373095e+000; --- constant sqrt2_inv : real := 7.071067811865475e-001; - type real_array_t is array (natural range <>) of real; type natural_array_t is array (natural range <>) of natural; type phase_relation_t is (phase_90deg, phase_270deg); @@ -57,14 +52,6 @@ package nco_pkg is function sin_tbl(nsamples : integer; omega, phi_in : real) return real_array_t; function cos_tbl(nsamples : integer; omega, phi_in : real) return real_array_t; - ------------------------------------------------------------- - -- Constructor helpers - -- Use: variable v8u6 : ufixed_t(ufixed(8,6)'range); --- function uproto (nbits : integer; nbits_frac : integer) return ufixed; - - -- Use: variable v8s6 : sfixed_t(sfixed(8,6)'range); --- function sproto (nbits : integer; nbits_frac : integer) return sfixed; - end; -- package nco_pkg; ------------------------------------------------------------------------------- @@ -99,20 +86,5 @@ package body nco_pkg is return tbl; end cos_tbl; - ------------------------------------------------------------- - -- Constuctor helpers --- function uproto (nbits : integer; nbits_frac : integer) return ufixed is --- constant result : ufixed (nbits-nbits_frac-1 downto -nbits_frac) := (others => '0'); --- begin --- return result(nbits-nbits_frac-1 downto -nbits_frac); --- end uproto; - - ------------------------------------------------------------- --- function sproto (nbits : integer; nbits_frac : integer) return sfixed is --- constant result : sfixed (nbits-nbits_frac downto -nbits_frac+1) := (others => '0'); --- begin --- return result(nbits-nbits_frac downto -nbits_frac+1); --- end sproto; - ------------------------------------------------------------------------------- end; -- package nco_pkg;