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

deferred class
	TEST_INHERITANCE_EXPORT_01
inherit
 NUMERIC
  export {STRING,LIST} OUT, zero , divisible
          {STRING,LIST, INTEGER }  is_equal   end

  NUMERIC
  export {STRING,LIST} one
          {STRING,LIST, INTEGER }  is_equal,divisible    end



end