Commit before work on beziergun

2021-03-14 12:05:27 +01:00
parent b0c8c10658
commit 5ce9b4487b
2 changed files with 10 additions and 11 deletions
@@ -122,7 +122,7 @@ worldPictures w

 testPic :: World -> [Picture]
 testPic w = --[blank]
-     [setLayer 1 $ onLayerL [99] $ bezierQuad white red 20 20 (00,00) (150,90) (200,200) ]
+     [setLayer 1 $ onLayerL [99] $ bezierQuad white red 5 5 (00,00) (300,305) (50,000) ]
    -- $ uncurry translate (mouseWorldPos w)