# [Maxima] Help

Aleksas Domarkas aleksasd873 at gmail.com
Thu Jan 5 03:01:31 CST 2012

```help to http://www.math.utexas.edu/pipermail/maxima/2012/027306.html

A.Domarkas

We draw  "Yin&yang".  See
http://en.wikipedia.org/wiki/Yin_and_yang

(%i2) wxdraw2d( proportional_axes=xy,
x_voxel = 30,
y_voxel = 30,
fill_color = grey,
region(y<=sqrt(-2*x-x^2) and x^2+y^2<=4, x,-2,2, y,-2,2),
region(y<=-sqrt(2*x-x^2) and x^2+y^2<=4, x,-2,2, y,-2,2),
color=black,
implicit(x^2+y^2=4,x,-2,2, y,-2,2));
(%t2)  << Graphics >>
(%o2)

"Yin&yang" :
(%i3) wxdraw2d(
proportional_axes=xy,
x_voxel = 30,
y_voxel = 30,
fill_color = black,
region(x>=-sqrt(-2*y-y^2) and x^2+y^2<=4, x,-2,2, y,-2,2),
region(x>=sqrt(2*y-y^2) and x^2+y^2<=4, x,-2,2, y,-2,2),
color=black,
implicit(x^2+y^2=4,x,-2,2, y,-2,2),
point_type =filled_circle,
point_size=5,
points([[0,1]]),
color=white,
points([[0,-1]])
);
(%t3)  << Graphics >>
(%o3)

Aleksas D.

Aleksas D.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.math.utexas.edu/pipermail/maxima/attachments/20120105/8f247e24/attachment.html>
```