It's a simple fractal visualizer based on the tutorial [CodingMath: Episode 35] (https://www.youtube.com/watch?v=bIfNwgUVjV8).
It implements SierpinskiTriangle and KochCurve. It uses Graphics Blank as a html canvas library directly from haskell.m
Click on the left side to decrease number of iterations, click on the right increase. Press any key to toggle between Sierpinski and Koch
![Sierpinski] (/images/Sierpinski.png) ![Koch] (/images/Koch.png)