context-free-art: Generate art from context-free grammars

Create art via context free grammar production rules. Includes an SVG backend.

Context free grammar primer

Context free grammars consist of a set of terminal symbols, a set of non-terminal symbols, and production rules that map non-terminals to other symbols.

With a context-free grammar, we can generate strings of terminals that conform to the specified language.

Our language will describe graphics.

Example

import Art.ContextFree
import Data.List.NonEmpty

-- let's define a Production rule
a = Circle 1

-- this will produce an IO Svg from the blaze-svg package
-- to turn it into a string we can use one of the `blaze-svg` renderers
graphic1 = interpret $ Circle 1

-- let's create a non-terminal, at every layer,
-- this will have an 85% chance of rendering another circle
circles = NonTerminal $ (85, [Move (2, 0)], Circle 1 :| [circles]) :| []

• Art
  • Art.ContextFree