[ Objekt ] korduv

var r := Objekt uus.
r sisse: ['∞'] tee: { :x
Stdout kirjuta: x, lause.
(x < 3) tõsi: { self korduv ∞ (x + 1). }.
}.
r ∞ 1.
1
2
3