Bitmap/Bézier curves/Cubic: Difference between revisions

m (Unless I am mistaken, lists use .append whilst sets use .add - pts is a list.)
Line 277:
viewRGB (randomctrlpts; 255 255 0) drawBezier myimg NB. display image with bezier line</lang>
 
=={{header|Mathematica}}==
<lang Mathematica>points= {{0, 0}, {1, 1}, {2, -1}, {3, 0}};
Graphics[{BSplineCurve[points], Green, Line[points], Red, Point[points]}]</lang>
[[File:MmaCubicBezier.png]]
=={{header|OCaml}}==