> (anObject copy) setName "Rectangulo" > Rectangulo.lado1 = 0 > Rectangulo.lado2 = 0 > Rectangulo str > ( Rectangulo createChild ) setName "r1" > r1.lado1 = 100 > r1.lado2 = 100 > r1 str > Rectangulo.area = {: self.lado1 * self.lado2 } > Rectangulo area > r1 area