(*						      *)
(* Numerical Mathematics and Computing, Fifth Edition *)
(* Ward Cheney & David Kincaid		              *)
(* Brooks/Cole Publ. Co.			      *)
(* (c) 2003                                           *)
(* No warranties implied or expressed.	              *)
(* File: bezier  				      *)

(* spline example 3 *)
<<Graphics`Spline`
pts = {{1,1}, {2,4}, {4,5}, {3,3}, {5,2}, {4,1}, {1,1}}
Show[Graphics[Spline[pts, Bezier, SplineDots->Automatic]]]