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

class
	TEST_FEATURE_CALL_02

feature -- Access




a_command is
    -- this is a command
  do

  end

a_function:STRING is
  --
  local
  	i:STRING
   do

	 i.to_lower

  end

end