3 files changed, 61 insertions, 0 deletions
diff --git a/src/circle.sql b/src/circle.sql
new file mode 100644
index 0000000..46874cc
--- /dev/null
+++ b/src/circle.sql
@@ -0,0 +1,18 @@
+DELETE FROM images WHERE id = 'circle';
+INSERT INTO images (id, width, height) VALUES ('circle', 200, 200) RETURNING id;
+
+WITH RECURSIVE
+  image AS (SELECT * FROM images WHERE id = 'circle'),
+  circle AS (SELECT width/2 AS cx, height/2 AS cy, 80 AS radius FROM image),
+  horizontal(x) AS
+    (SELECT width FROM image UNION ALL SELECT x - 1 FROM horizontal WHERE x > 1),
+  vertical(y) AS
+    (SELECT height FROM image UNION ALL SELECT y - 1 FROM vertical WHERE y > 1),
+  _pixels(x, y, r, g, b) AS (SELECT
+    x, y,
+    150,
+    255 * MAX(0, MIN(1, (SELECT POW(x - cx, 2) + POW(y - cy, 2) - POW(radius, 2) FROM circle))),
+    150
+    FROM vertical, horizontal
+  )
+INSERT INTO pixels (image_id, x, y, r, g, b) SELECT 'circle', x, y, r, g, b FROM _pixels;
diff --git a/src/gradient.sql b/src/gradient.sql
new file mode 100644
index 0000000..f04cdad
--- /dev/null
+++ b/src/gradient.sql
@@ -0,0 +1,12 @@
+DELETE FROM images WHERE id = 'gradient';
+INSERT INTO images (id, width, height) VALUES ('gradient', 200, 200) RETURNING id;
+
+WITH RECURSIVE
+  image AS (SELECT * FROM images WHERE id = 'gradient'),
+  horizontal(x) AS
+    (SELECT width FROM image UNION ALL SELECT x - 1 FROM horizontal WHERE x > 1),
+  vertical(y) AS
+    (SELECT height FROM image UNION ALL SELECT y - 1 FROM vertical WHERE y > 1),
+  _pixels(x, y, r, g, b) AS
+    (SELECT x, y, mod(x, 255), mod(y, 255), 100 FROM vertical, horizontal)
+INSERT INTO pixels (image_id, x, y, r, g, b) SELECT 'gradient', x, y, r, g, b FROM _pixels;
diff --git a/src/mandelbrot.sql b/src/mandelbrot.sql
new file mode 100644
index 0000000..1c25461
--- /dev/null
+++ b/src/mandelbrot.sql
@@ -0,0 +1,31 @@
+DELETE FROM images WHERE id = 'mandelbrot';
+INSERT INTO images (id, width, height) VALUES ('mandelbrot', 400, 400) RETURNING id;
+
+WITH RECURSIVE
+  image AS (SELECT *, 0.008 AS scale, (width * 5)/7 AS ox, (height / 2) AS oy FROM images WHERE id = 'mandelbrot'),
+  horizontal(x) AS
+    (SELECT width FROM image UNION ALL SELECT x - 1 FROM horizontal WHERE x > 1),
+  vertical(y) AS
+    (SELECT height FROM image UNION ALL SELECT y - 1 FROM vertical WHERE y > 1),
+  mando(i, px, py, cx, cy, x, y) AS (
+    SELECT 0, 0.0, 0.0,
+      (SELECT (horizontal.x - ox)*scale FROM image), (SELECT (vertical.y - oy)*scale FROM image),
+      horizontal.x, vertical.y
+    FROM vertical, horizontal
+    UNION ALL
+    SELECT i + 1, px*px - py*py + cx, 2.0*px*py + cy, cx, cy, x, y FROM mando
+      WHERE (px*px + py*py) < 4.0 AND i < 20
+  ),
+  mandogrouped(x, y, i) AS (SELECT x, y, max(i) FROM mando GROUP BY x, y),
+  colors(i, r, g, b) AS (
+    SELECT 19, 255, 150, 150 UNION ALL
+    SELECT 10, 150, 120, 120 UNION ALL
+    SELECT 7, 50,  100, 100 UNION ALL
+    SELECT 0 , 0,   50,  50
+  ),
+  _pixels(x, y, r, g, b) AS (
+    SELECT x, y, c.r, c.g, c.b
+      FROM mandogrouped g
+      JOIN colors c ON c.i = (SELECT max(i) FROM colors WHERE i <= g.i)
+  )
+INSERT INTO pixels (image_id, x, y, r, g, b) SELECT 'mandelbrot', x, y, r, g, b FROM _pixels;