dimitri/lsystems
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add Penrose P3 tiling

Browse source
This commit is contained in:
Dimitri Lozeve 2018-01-17 11:09:11 +00:00
parent 05feb56763
commit 76a579c981
2 changed files with 18 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
app/Main.hs
View file

@ -8,4 +8,4 @@ import Examples
main :: IO ()
main =
display (InWindow "L-System" (200, 200) (10, 10)) black (color white pic)
where pic = drawLSystem $ iterateLSystem 7 plant
where pic = drawLSystem $ iterateLSystem 6 penroseP3