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

[ bsd3, graphics, library, program ] [ Propose Tags ]

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.


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
a = Mod [Move (2, 0)] b
b = NonTerminal $ (85, c) :| []
c = NonTerminal $ (100, Circle 1) :| [(100, a)]
Versions [RSS] [faq],,,,,,
Change log
Dependencies base (>= && <4.13), bifunctors (==5.5.*), blaze-markup, blaze-svg (>=0.3.6 && <0.4), extra (==1.6.*), HUnit (==1.6.*), random (==1.1.*), text (==1.2.*), text-show (==3.8.*) [details]
License BSD-3-Clause
Author Owen Shepherd
Category Graphics
Home page
Uploaded by 414owen at 2019-10-17T00:26:56Z
Distributions NixOS:
Executables tests
Downloads 1950 total (9 in the last 30 days)
Rating (no votes yet) [estimated by Bayesian average]
Your Rating
  • λ
  • λ
  • λ
Status Hackage Matrix CI
Docs uploaded by user
Build status unknown [no reports yet]


[Index] [Quick Jump]


Maintainer's Corner

For package maintainers and hackage trustees