wgd(scenes)(cur)(instances)(a) = {(type, circle)};

%using wgd(scenes)(cur)(instances)(a);

current(type) = circle;
current(x) = 200;
current(y) = 240;
current(vx) = 180.0;
current(vy) = 0;
current(radius) = 50;

wgd(scenes)(cur)(instances)(b) = {(type, circle)};

%using wgd(scenes)(cur)(instances)(b);

current(type) = circle;
current(x) = 600;
current(y) = 260;
current(vx) = -380.0;
current(vy) = 0;
current(radius) = 50;

wgd(scenes)(cur)(instances)(c) = {(type, polygon), (vertices, {
	(0, {(x, 200), (y, 400)}),
	(1, {(x, 150), (y, 500)}),
	(2, {(x, 225), (y, 550)}),
	(3, {(x, 310), (y, 480)}),
	(4, {(x, 310), (y, 460)}),
	(count, 5),
}),(vx, 80.0), (vy, 270.0), (vrot, 0.0)};

wgd(scenes)(cur)(instances)(d) = {(type, polygon),(vertices, {
	(0, {(x, 50), (y, 50)}),
	(1, {(x, 100), (y, 50)}),
	(2, {(x, 100), (y, 100)}),
	(3, {(x, 50), (y, 100)}),
	(count, 4),
})};

%using wgd(scenes)(cur)(instances)(d);

current(vx) = 100.0;
current(vy) = 120.0;
current(vrot) = 0.0;