%% Created by Maple V Release 5 (SUN SPARC SOLARIS)
%% Source Worksheet: figures_cercles_osculateurs.mws
%% Generated: Tue Mar 12 15:51:50 2002
\documentclass{article}
\usepackage{maple2e}
\DefineParaStyle{Maple Output}
\DefineParaStyle{Maple Plot}
\DefineCharStyle{2D Math}
\DefineCharStyle{2D Output}
\begin{document}
\begin{maplegroup}
\begin{mapleinput}
\mapleinline{active}{1d}{with(plots):f:=x->x^2 ;}{%
}
\end{mapleinput}

\mapleresult
\begin{maplelatex}
\[
f := x\rightarrow x^{2}
\]
\end{maplelatex}

\end{maplegroup}
\begin{maplegroup}
\begin{mapleinput}
\mapleinline{active}{1d}{A:=implicitplot(
\{seq(x^2+(y-(i/4))^2=(i/4)^2,i=1..4)\},x=-1..1,y=0..2):}{%
}
\end{mapleinput}

\end{maplegroup}
\begin{maplegroup}
\begin{mapleinput}
\mapleinline{active}{1d}{B:=plot(f(x),x=-1..1,y=0..2,thickness=3):}{%
}
\end{mapleinput}

\end{maplegroup}
\begin{maplegroup}
\begin{mapleinput}
\mapleinline{active}{1d}{display(\{A,B\});}{%
}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{figures_cercles_osculateurs01.eps}
\end{center}

\end{maplegroup}
\begin{maplegroup}
\begin{mapleinput}
\end{mapleinput}

\end{maplegroup}
\begin{maplegroup}
\begin{mapleinput}
\mapleinline{active}{1d}{A:=implicitplot(
\{seq(x^2+(y-(i/8+1/2))^2=(i/8+1/2)^2,i=0..4)\},x=-1..1,y=0..2):}{%
}
\end{mapleinput}

\end{maplegroup}
\begin{maplegroup}
\begin{mapleinput}
\end{mapleinput}

\end{maplegroup}
\begin{maplegroup}
\begin{mapleinput}
\end{mapleinput}

\begin{mapleinput}
\mapleinline{active}{1d}{display(\{A,B\});}{%
}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{figures_cercles_osculateurs02.eps}
\end{center}

\end{maplegroup}
\begin{maplegroup}
\begin{mapleinput}
\end{mapleinput}

\end{maplegroup}
\end{document}
%% End of Maple V Output
