indexing
	description: "Objects that ..."
	author: ""
	date: "$Date$"
	revision: "$Revision$"

class
	D

feature
	selected_action: PROCEDURE [ANY, TUPLE]

	init is
		do
--			selected_action := agent do 
--				io.new_line
-- 			end
		end


end