Refactor rendering

This commit is contained in:
jgk
2021-06-23 15:16:30 +02:00
parent 899c1c5f6e
commit 9f1b501388
5 changed files with 25 additions and 33 deletions
+1 -1
View File
@@ -86,7 +86,7 @@ data Picture
| Line Int [Point2]
| LineCol Int [(Point2,RGBA)]
| Pictures [Picture]
| OverPic (Point3 -> Point3) (Point2 -> Point2) Float (Point4 -> Point4) Picture
| OverPic (Point3 -> Point3) Float (Point4 -> Point4) Picture
| OnLayer Int Picture
blank :: Picture