Bitmap/Midpoint circle algorithm: Difference between revisions

Content added Content deleted
Line 1,105: Line 1,105:
</lang>
</lang>


=={{header|Mathematica}}==
=={{header|Mathematica}} / {{header|Wolfram Language}}==
<lang mathematica>SetAttributes[drawcircle, HoldFirst];
<lang mathematica>SetAttributes[drawcircle, HoldFirst];
drawcircle[img_, {x0_, y0_}, r_, color_: White] :=
drawcircle[img_, {x0_, y0_}, r_, color_: White] :=