Beispiel 1) .Teenager~NEW ~~"NAME="("from 13 to 18") ~Age .Child~NEW ~~"NAME="("from 5 to 12") ~Age .Toddler~NEW ~~"NAME="("from 1 to 4") ~Age ::CLASS Teenager SUBCLASS Object ::ATTRIBUTE Name ::METHOD Age SAY self~Name":" "Difficult" "-" self ::CLASS Child SUBCLASS Teenager ::METHOD Age SAY self~Name":" "Kind of fun" "-" self ::CLASS "Toddler" SUBCLASS Teenager ::METHOD Age SAY self~Name":" "Tiresome" "-" self Beispiel 2) a1 = .Animal~New; a1~Name= "Kitty"; a1~Family= "Mitty"; a1~type= "cat" a2=.Animal~New~~"Name="("Tyler") a2~~"Family="("Butch"); a2~type= "dog" SAY a1~Name a1~Family a1~type SAY a2~Name a2~Family a2~type SAY "All animals in the house: "a1~type "and" a2~type ::CLASS Animal ::ATTRIBUTE Name ::ATTRIBUTE Family ::ATTRIBUTE type