Render bezier curves using distance fields

2021-03-14 00:13:29 +01:00
parent 3aefb8319d
commit b0c8c10658
6 changed files with 51 additions and 37 deletions
@@ -20,7 +20,7 @@ picToLTree mx (PolygonCol i vs)
 picToLTree mx (BezierQuad i vs) 
    = filtB mx i $ LLeaf $ RenderBezQ $ zip3 (map zeroZ ps) cols rs
        where (ps,cols,offps,rads) = unzip4 vs
-              rs = zipWith (\(x,y) z -> (x,y,z)) offps rads
+              rs = zipWith (\(x,y) (z,w) -> (x,y,z,w)) offps rads
                                      
 picToLTree mx (Circle i colC colE r)
    = filtB mx i $ LLeaf $ RenderEllipse [( (-r, r,0), colC)