class
	TEAM

inherit
	ENTITY

create
	make

feature {NONE} -- Initialization

	make (a_name: READABLE_STRING_GENERAL)
		do
			create name.make_from_string_general (a_name)
			create {ARRAYED_LIST [PERSON]} persons.make (0)
		end

feature -- Access

	name: IMMUTABLE_STRING_32

	persons: LIST [PERSON]

	owner: detachable PERSON

feature -- Element change

	set_owner (p: detachable PERSON)
		do
			owner := p
		end

	put (a_person: PERSON)
		do
			persons.extend (a_person)
		end

end