module A extends Sphere(0.1).(setShader(GREEN));
module B;

protected void init ()
[
	Axiom ==> A B;
]

float alpha = 0;
float radius = 0.5;
float x, y;

public void run ()
[
	{
		alpha += 0.1; // forsicht: bogenmaß
		x = radius * Math.cos(alpha);
		y = radius * Math.sin(alpha);
		radius += 0.01;
	}
	B ==>  ^ Translate(x,y,0) A B;
]