note
	description: "Medications"
	author: "Jackie Wang"

class 
	MEDICATION

inherit
	ANY
		redefine
			is_equal,
			out
		end

create 
	make

feature -- Queries

	name: STRING_8
	
feature -- Constructor

	make (n: STRING_8)
			-- Initialize a new medication identified through 'n'.
		require
				n /= Void
		do
			name := n
		ensure
				name ~ n
		end
	
feature -- Create interaction

	interacted_with alias "|->" (other: like Current): INTERACTION
		do
			create Result.make (Current, other)
		end
	
feature -- Equality

	is_equal (other: like Current): BOOLEAN
			-- Are current medication equal to 'other'?
		do
			if other /= Void then
				Result := name ~ other.name
			end
		end
	
feature -- Debug output

	debug_output: STRING_8
		do
			Result := out
		end

	out: STRING_8
			-- New string containing terse printable representation
			-- of current object
		do
			Result := name
		end
	
end -- class MEDICATION

Generated by ISE EiffelStudio