class TEST1 $(INHERITANCE) feature value: INTEGER once ("OBJECT") Result := 29 end end