#!/usr/local/bin/cz --
use b
Main:
	int size = pow(3, 6)
	space(size, size)
	origin(w_2, h_2+2)   # why +2?  something borken!
	sierpinski(0, 0, size, 1)

sierpinski(int x, int y, int r, int c):
	if c == 0:
		black()
	else:
		white()
	rect_fill(x, y, r, r)
	if r >= 3:
		r /= 3
		if c == 0:
			white()
		else:
			black()
		rect_fill(x+r, y+r, r, r)
		sierpinski(x, y, r, c)
		sierpinski(x+r, y, r, c)
		sierpinski(x+r*2, y, r, c)
		sierpinski(x+r*2, y+r, r, c)
		sierpinski(x+r*2, y+r, r, c)
		sierpinski(x+r*2, y+r*2, r, c)
		sierpinski(x+r, y+r*2, r, c)
		sierpinski(x, y+r*2, r, c)
		sierpinski(x, y+r, r, c)
#		sierpinski(x+r, y+r, r, 1-c)