class CHILD inherit COUNTER redefine set, checkval end feature -- Element change set (some_value: INTEGER) is -- Set value of counter to some_value. do item := some_value - 10 ensure then checkval > 0 end checkval: INTEGER is -- Get value of counter do Result := item + 20 end end