v7_0.vhd

台湾全华科技VHDL教材实例

package maxdata is

	function max (Ina : integer ; Inb : integer ) return
                integer ; 
		
end maxdata;	

package body maxdata is

	--function max (Ina : integer ; Inb : integer ) return
    --    integer is
    --    variable MaxValue : integer;
   	--begin
	--	if Ina > Inb then
	--		MaxValue := Ina;
	--	else
	--		MaxValue := Inb;
	--	End if;
	--	return MaxValue;
	--end max;
	
	function max(Ina : integer ;  Inb : integer ) return
	    integer is	         
	begin
		if Ina > Inb then
			return Ina;
		else
			return Inb;
		end if;
	end max;
 
		
end maxdata;