Improve ellipses
This commit is contained in:
@@ -1035,7 +1035,7 @@ moveFlame rotd w pt =
|
||||
-- $ circleSolid 5
|
||||
-- $ pictures $ reverse [color white $ circleSolid 4
|
||||
$ pictures $ reverse
|
||||
[color red $ ellipseSolid (0,-2) (0,2) 6
|
||||
[color red $ ellipseSolid (-2,0) (2,0) 6
|
||||
--,color white $ ellipseSolid (2,0) (-2,0) 6
|
||||
--,color white $ ellipseSolid (2,0) (-2,0) 6
|
||||
,color (withAlpha 0.5 white) $ circleSolid 5
|
||||
|
||||
Reference in New Issue
Block a user