%% Created by Maple 9.5, Linux
%% Source Worksheet: Untitled (1)
%% Generated: Tue Apr 11 12:23:30 CDT 2017
\documentclass{article}
\usepackage{maplestd2e}
\def\emptyline{\vspace{12pt}}
\DefineParaStyle{Maple Heading 4}
\DefineParaStyle{Maple Heading 2}
\DefineParaStyle{Maple Text Output}
\DefineParaStyle{Maple Bullet Item}
\DefineParaStyle{Maple Warning}
\DefineParaStyle{Maple Error}
\DefineParaStyle{Maple Dash Item}
\DefineParaStyle{Maple Heading 3}
\DefineParaStyle{Maple Heading 1}
\DefineParaStyle{Maple Title}
\DefineParaStyle{Maple Normal}
\DefineCharStyle{Maple 2D Input}
\DefineCharStyle{Maple Maple Input}
\DefineCharStyle{Maple 2D Output}
\DefineCharStyle{Maple 2D Math}
\DefineCharStyle{Maple Hyperlink}
\begin{document}
\pagestyle{empty}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{with(plots);}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{maplettyout}
\begin{Maple Warning}{\normalsize{Warning, the name changecoords has been redefined}}\end{Maple Warning}


\end{maplettyout}

\mapleresult
\begin{maplelatex}
\QTR{Maple 2D Output}{\mapleinline{inert}{2d}{[animate, animate3d, animatecurve, arrow, changecoords, complexplot, complexplot3d, conformal, conformal3d, contourplot, contourplot3d, coordplot, coordplot3d, cylinderplot, densityplot, display, display3d, fieldplot, fieldplot3d, gradplot, gradplot3d, graphplot3d, implicitplot, implicitplot3d, inequal, interactive, interactiveparams, listcontplot, listcontplot3d, listdensityplot, listplot, listplot3d, loglogplot, logplot, matrixplot, multiple, odeplot, pareto, plotcompare, pointplot, pointplot3d, polarplot, polygonplot, polygonplot3d, polyhedra_supported, polyhedraplot, replot, rootlocus, semilogplot, setoptions, setoptions3d, spacecurve, sparsematrixplot, sphereplot, surfdata, textplot, textplot3d, tubeplot]}{%
$[{\it animate},{\it animate3d},{\it animatecurve}\\
\mbox{},{\it arrow},{\it changecoords},{\it complexplot}\\
\mbox{},{\it complexplot3d},{\it conformal},{\it conformal3d}\\
\mbox{},{\it contourplot},{\it contourplot3d},{\it coordplot}\\
\mbox{},{\it coordplot3d},{\it cylinderplot},{\it densityplot}\\
\mbox{},{\it display},{\it display3d},{\it fieldplot},{\it fieldplot3d}\\
\mbox{},{\it gradplot},{\it gradplot3d},{\it graphplot3d}\\
\mbox{},{\it implicitplot},{\it implicitplot3d},{\it inequal}\\
\mbox{},{\it interactive},{\it interactiveparams},{\it listcontplot}\\
\mbox{},{\it listcontplot3d},{\it listdensityplot},{\it listplot}\\
\mbox{},{\it listplot3d},{\it loglogplot},{\it logplot},{\it matrixplot}\\
\mbox{},{\it multiple},{\it odeplot},{\it pareto},{\it plotcompare}\\
\mbox{},{\it pointplot},{\it pointplot3d},{\it polarplot}\\
\mbox{},{\it polygonplot},{\it polygonplot3d},{\it polyhedra\_supported}\\
\mbox{},{\it polyhedraplot},{\it replot},{\it rootlocus}\\
\mbox{},{\it semilogplot},{\it setoptions},{\it setoptions3d}\\
\mbox{},{\it spacecurve},{\it sparsematrixplot},{\it sphereplot}\\
\mbox{},{\it surfdata},{\it textplot},{\it textplot3d},{\it tubeplot}\\
\mbox{}]$}
}

\end{maplelatex}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot(2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0)/(1-4*k\symbol{94}2),k=1..30),x=-3*Pi..3*Pi,color=plum,thickness=2,numpoints=1000,title="Even Extension");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot1.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{int(sin(x)*cos(n*x),x=0..Pi);}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{maplelatex}
\QTR{Maple 2D Output}{\mapleinline{inert}{2d}{-(1+cos(Pi*n))/(-1+n^2)}{%
\[
-{\frac {1+\cos \left( \pi \,n \right) }{-1+{n}^{2}}}
\]
}
}

\end{maplelatex}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0)/(1-4*k\symbol{94}2),k=1..30),2/Pi],x=-0..Pi,thickness=2,view=0..1.3,title="t=0.0");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot2.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0.01)/(1-4*k\symbol{94}2),k=1..30),2/Pi],x=-0..Pi,thickness=2,view=0..1.3,title="t=0.01");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot3.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0.02)/(1-4*k\symbol{94}2),k=1..30),2/Pi],x=-0..Pi,thickness=2,view=0..1.3,title="t=0.02");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot4.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0.03)/(1-4*k\symbol{94}2),k=1..30),2/Pi],}\QTR{Maple Maple Input}{
x=0..Pi,thickness=2,view=0..1.3,title="t=0.03");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot5.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0.05)/(1-4*k\symbol{94}2),k=1..30),2/Pi],}\QTR{Maple Maple Input}{
x=0..Pi,thickness=2,view=0..1.3,title="t=0.05");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot6.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0.1)/(1-4*k\symbol{94}2),k=1..30),2/Pi],}\QTR{Maple Maple Input}{
x=0..Pi,thickness=2,view=0..1.3,title="t=0.1");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot7.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0.2)/(1-4*k\symbol{94}2),k=1..30),2/Pi],}\QTR{Maple Maple Input}{
x=0..Pi,thickness=2,view=0..1.3,title="t=0.2");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot8.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0.3)/(1-4*k\symbol{94}2),k=1..30),2/Pi],}\QTR{Maple Maple Input}{
x=0..Pi,thickness=2,view=0..1.3,title="t=0.3");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot9.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*0.6)/(1-4*k\symbol{94}2),k=1..30),2/Pi],}\QTR{Maple Maple Input}{
x=0..Pi,thickness=2,view=0..1.3,title="t=0.6");}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot10.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{plot([2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*1.0)/(1-4*k\symbol{94}2),k=1..30),2/Pi],}\QTR{Maple Maple Input}{
x=0..Pi,thickness=2,view=0..1.3,title="t=1.0");}\QTR{Maple Maple Input}{
}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot11.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{}\end{Maple Normal}}{}
\end{mapleinput}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{}\end{Maple Normal}}{}
\end{mapleinput}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{}\end{Maple Normal}}{}
\end{mapleinput}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{a:=animate(2/Pi + 4/Pi * sum(cos(2*k*x)*exp(-4*k\symbol{94}2*t)/(1-4*k\symbol{94}2),k=1..30),}\QTR{Maple Maple Input}{
x=0..Pi,}\QTR{Maple Maple Input}{t=0..1,}\QTR{Maple Maple Input}{thickness=2,view=0..1.3,title="Animation for Insultated Ends Example"):}\QTR{Maple Maple Input}{
}\end{Maple Normal}}{}
\end{mapleinput}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{ave:=plot(2/Pi,x=0..Pi,color=green,thickness=2,view=0..1.3):}\end{Maple Normal}}{}
\end{mapleinput}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{display(a,ave);}\end{Maple Normal}}{}
\end{mapleinput}

\mapleresult
\begin{center}
\mapleplot{Heat4plot12.eps}


\end{center}
\begin{mapleinput}
\mapleinline{active}{1d}{\begin{Maple Normal}\QTR{Maple Maple Input}{}\QTR{Maple Maple Input}{}\end{Maple Normal}}{}
\end{mapleinput}

\end{document}
%% End of Maple 9.5 Output