Bitmap/Bézier curves/Cubic: Difference between revisions
Content added Content deleted
(add Tcl) |
m (→{{header|Tcl}}) |
||
Line 279: | Line 279: | ||
proc drawBezier {img colour args} { |
proc drawBezier {img colour args} { |
||
# ensure the |
# ensure the points are increasing along the x-axis |
||
set points [lsort -real -index 0 $args] |
set points [lsort -real -index 0 $args] |
||