URL
https://opencores.org/ocsvn/simple_fm_receiver/simple_fm_receiver/trunk
Subversion Repositories simple_fm_receiver
[/] [simple_fm_receiver/] [trunk/] [source/] [adder_13bit.vhdl] - Rev 43
Go to most recent revision | Compare with Previous | Blame | View Log
-- $Id: adder_13bit.vhdl,v 1.4 2008-06-26 06:12:29 arif_endro Exp $ ------------------------------------------------------------------------------- -- Title : Adder 13 bit -- Project : FM Receiver ------------------------------------------------------------------------------- -- File : adder_13bit.vhdl -- Author : "Arif E. Nugroho" <arif_endro@yahoo.com> -- Created : 2004/12/23 -- Last update : -- Simulators : -- Synthesizers: -- Target : ------------------------------------------------------------------------------- -- Description : Ripple carry adder 13 bit with output 14 bit ------------------------------------------------------------------------------- -- Copyright (C) 2004 Arif Endro Nugroho ------------------------------------------------------------------------------- -- -- THIS SOURCE FILE MAY BE USED AND DISTRIBUTED WITHOUT RESTRICTION -- PROVIDED THAT THIS COPYRIGHT STATEMENT IS NOT REMOVED FROM THE FILE AND THAT -- ANY DERIVATIVE WORK CONTAINS THE ORIGINAL COPYRIGHT NOTICE AND THE -- ASSOCIATED DISCLAIMER. -- ------------------------------------------------------------------------------- -- -- THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR -- IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF -- MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO -- EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, -- SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, -- PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; -- OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, -- WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR -- OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF -- ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. -- ------------------------------------------------------------------------------- library IEEE; use IEEE.STD_LOGIC_1164.ALL; entity adder_13bit is port ( addend_13bit : in bit_vector (12 downto 0); augend_13bit : in bit_vector (12 downto 0); adder13_output: out bit_vector (13 downto 0) -- 14 bit output ); end adder_13bit; architecture structural of adder_13bit is component fulladder port ( addend : in bit; augend : in bit; carry_in : in bit; sum : out bit; carry : out bit ); end component; -- internal signal signal c00 : bit; signal c01 : bit; signal c02 : bit; signal c03 : bit; signal c04 : bit; signal c05 : bit; signal c06 : bit; signal c07 : bit; signal c08 : bit; signal c09 : bit; signal c10 : bit; signal c11 : bit; signal c12 : bit; signal c13 : bit; signal over13 : bit; signal adder13_output_int : bit_vector (12 downto 0); signal ov : bit; begin c00 <= '0'; over13 <= (addend_13bit (12) xor augend_13bit (12)); ov <= ((adder13_output_int(12) and over13) or (c13 and (not (over13)))); adder13_output(12 downto 00) <= adder13_output_int; adder13_output(13) <= ov; fa12 : fulladder port map ( addend => addend_13bit(12), augend => augend_13bit(12), carry_in => c12, sum => adder13_output_int(12), carry => c13 ); fa11 : fulladder port map ( addend => addend_13bit(11), augend => augend_13bit(11), carry_in => c11, sum => adder13_output_int(11), carry => c12 ); fa10 : fulladder port map ( addend => addend_13bit(10), augend => augend_13bit(10), carry_in => c10, sum => adder13_output_int(10), carry => c11 ); fa09 : fulladder port map ( addend => addend_13bit(09), augend => augend_13bit(09), carry_in => c09, sum => adder13_output_int(09), carry => c10 ); fa08 : fulladder port map ( addend => addend_13bit(08), augend => augend_13bit(08), carry_in => c08, sum => adder13_output_int(08), carry => c09 ); fa07 : fulladder port map ( addend => addend_13bit(07), augend => augend_13bit(07), carry_in => c07, sum => adder13_output_int(07), carry => c08 ); fa06 : fulladder port map ( addend => addend_13bit(06), augend => augend_13bit(06), carry_in => c06, sum => adder13_output_int(06), carry => c07 ); fa05 : fulladder port map ( addend => addend_13bit(05), augend => augend_13bit(05), carry_in => c05, sum => adder13_output_int(05), carry => c06 ); fa04 : fulladder port map ( addend => addend_13bit(04), augend => augend_13bit(04), carry_in => c04, sum => adder13_output_int(04), carry => c05 ); fa03 : fulladder port map ( addend => addend_13bit(03), augend => augend_13bit(03), carry_in => c03, sum => adder13_output_int(03), carry => c04 ); fa02 : fulladder port map ( addend => addend_13bit(02), augend => augend_13bit(02), carry_in => c02, sum => adder13_output_int(02), carry => c03 ); fa01 : fulladder port map ( addend => addend_13bit(01), augend => augend_13bit(01), carry_in => c01, sum => adder13_output_int(01), carry => c02 ); fa00 : fulladder port map ( addend => addend_13bit(00), augend => augend_13bit(00), carry_in => c00, sum => adder13_output_int(00), carry => c01 ); end structural;
Go to most recent revision | Compare with Previous | Blame | View Log