RosettaCodeData/Task/Constrained-genericity/Eiffel/constrained-genericity-2.e

class
    APPLE

inherit
    EATABLE

feature -- Basic operations

    eat
            -- Consume
        do
            print ("One apple eaten%N")
        end
end