{VERSION 6 0 "IBM INTEL NT" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{CSTYLE "" -1 256 "" 1 14 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{PSTYLE "Normal
" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 
-1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" 
-1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 
-1 0 }{PSTYLE "Maple Plot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 0 256 1 
{CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 
0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 256 "" 0 "" {TEXT 256 4 "Demo" }{TEXT -1 85 "\nSe
lect function\nselect point\nselect delta x\nplot fucntion and associa
ted secant line" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "restart;\nwith(p
lots):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 196 "f := x -> x^2:  \+
# select function\na := 1:         # select point (x-coordinate)\ndx :
= 0.2:      # select Delta x\nxint := 1:        # interval for graphin
g\nyint := 1:        # interval for graphing" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 281 "b := a + dx:\nm := (f(b)-f(a))/dx:\nG1 := plot(
[f(x), f(a) + m*(x-a)], x=(a-xint)..(a+xint),\nview = [a-xint..a+xint,
f(a)-yint..f(a)+yint], color=[red,blue], scaling = constrained):\nG2 :
= plot([[a,f(a)],[b,f(b)]],style=point,symbol=circle,thickness=4,\ncol
or=black):\ndisplay(G1,G2);\nm;" }}{PARA 13 "" 1 "" {GLPLOT2D 912 476 
476 {PLOTDATA 2 "6(-%'CURVESG6$7S7$$\"\"!F)F(7$$\"39LLLL3VfV!#>$\"3'ft
h!>PY+>!#?7$$\"3'pmm;H[D:)F-$\"374dzkVSYmF07$$\"3LLLLe0$=C\"!#=$\"3Ry/
hNJ9U:F-7$$\"3ILLL3RBr;F9$\"3Q3JOwF-$z#F-7$$\"3Ymm;zjf)4#F9$\"3pU9lin5
/WF-7$$\"3=LL$e4;[\\#F9$\"3!\\2H?N2TA'F-7$$\"3p****\\i'y]!HF9$\"3'py7`
.#[R%)F-7$$\"3,LL$ezs$HLF9$\"3V1NO@BZ36F97$$\"3_****\\7iI_PF9$\"364mB
\">!)zS\"F97$$\"3#pmmm@Xt=%F9$\"3_@TN'*fQ`<F97$$\"3QLLL3y_qXF9$\"3MI[n
WC(*)3#F97$$\"3i******\\1!>+&F9$\"3*=/Z7,,>]#F97$$\"3()******\\Z/NaF9$
\"3Oc-XV6(R&HF97$$\"3'*******\\$fC&eF9$\"34U-MW!G^U$F97$$\"3ELL$ez6:B'
F9$\"3m(*4;ER<$)QF97$$\"3Smmm;=C#o'F9$\"3+j3kpbBlWF97$$\"3-mmmm#pS1(F9
$\"3!GXE/Y2,*\\F97$$\"3]****\\i`A3vF9$\"3@D)3%4[MPcF97$$\"3slmmm(y8!zF
9$\"3l$3L9kyJC'F97$$\"3V++]i.tK$)F9$\"3>RHTH&RM%pF97$$\"39++](3zMu)F9$
\"33$)\\NbE%[k(F97$$\"3#pmm;H_?<*F9$\"3Fvn5CVl7%)F97$$\"3emm;zihl&*F9$
\"3-Me-![,,:*F97$$\"39LLL3#G,***F9$\"3;PP*=;m-)**F97$$\"3<LLezw5V5!#<$
\"3wDd?JO2)3\"Fbs7$$\"3!****\\PQ#\\\"3\"Fbs$\"3+d#4hxD'p6Fbs7$$\"3BLL$
e\"*[H7\"Fbs$\"3ce7dnU,h7Fbs7$$\"3#*******pvxl6Fbs$\"3y/^rUt.f8Fbs7$$
\"3z****\\_qn27Fbs$\"3;(3NJ'Q[e9Fbs7$$\"3%)***\\i&p@[7Fbs$\"3'R,q)pb/e
:Fbs7$$\"3#)****\\2'HKH\"Fbs$\"3c.Yr<GWs;Fbs7$$\"3_mmmwanL8Fbs$\"31g?1
x-py<Fbs7$$\"3'******\\2goP\"Fbs$\"3Y0!HhmVd*=Fbs7$$\"3CLLeR<*fT\"Fbs$
\"3BM#olgK]+#Fbs7$$\"3'******\\)Hxe9Fbs$\"3#*4ew@'=!G@Fbs7$$\"3Ymm\"H!
o-*\\\"Fbs$\"3?iD'eN\"3ZAFbs7$$\"3))***\\7k.6a\"Fbs$\"3?3S2L/+vBFbs7$$
\"3emmmT9C#e\"Fbs$\"3W6uszz[.DFbs7$$\"3\"****\\i!*3`i\"Fbs$\"3#4dN2/H;
k#Fbs7$$\"3QLLL$*zym;Fbs$\"3-g,s9A=yFFbs7$$\"3GLL$3N1#4<Fbs$\"3d***G(
\\jQ@HFbs7$$\"3kmm\"HYt7v\"Fbs$\"3]Lh\">uep1$Fbs7$$\"3%*******p(G**y\"
Fbs$\"3c7Pn,]%Q?$Fbs7$$\"3lmm;9@BM=Fbs$\"3[>.k[uSkLFbs7$$\"3ELLL`v&Q(=
Fbs$\"3!fQ%=I@M6NFbs7$$\"30++DOl5;>Fbs$\"3!G(*f#eUYrOFbs7$$\"3/++v.Uac
>Fbs$\"3`@xA@_1GQFbs7$$\"\"#F)$\"\"%F)-%'COLOURG6&%$RGBG$\"*++++\"!\")
F(F(-F$6$7S7$F($!3%**************>\"Fbs7$F+$!3gmmm@D4/6Fbs7$F2$!3QLLeP
Rk?5Fbs7$F7$!3+mmmrF(zE*F97$F=$!3vlmm,aGB$)F97$FB$!3gKL$e'z3$Q(F97$FG$
!34mm;*e/9^'F97$FL$!3D****\\Up#)3cF97$FQ$!3[mm;\\)z`n%F97$FV$!3S++]Kj#
\\u$F97$Fen$!3UJLLB0%yy#F97$Fjn$!3nlmm@)Q[%>F97$F_o$!3g*******p&=e**F-
7$Fdo$!3=^)*****\\:!H%F07$Fio$\"3W9+++d5a()F-7$F^p$\"3hLL$3&fK4<F97$Fc
p$\"3smmm'*>$4q#F97$Fhp$\"3+nmm'Q_4a$F97$F]q$\"3M,+](z&4=XF97$Fbq$\"3Y
nmm'GLIQ&F97$Fgq$\"3t-+](z1?L'F97$F\\r$\"3&=++D*RlNsF97$Far$\"3mpmmT]^
y\")F97$Ffr$\"37pm;9eNW!*F97$F[s$\"3EMLLe?Gy**F97$F`s$\"3OLL3&*o$[4\"F
bs7$Ffs$\"3')***\\UC$Gz6Fbs7$F[t$\"3]LL$[h([q7Fbs7$F`t$\"3C+++a1rk8Fbs
7$Fet$\"3o****\\:&*)oX\"Fbs7$Fjt$\"3'****\\PIxga\"Fbs7$F_u$\"3-++]O^5X
;Fbs7$Fdu$\"3\\mmm[g3M<Fbs7$Fiu$\"3F+++l@4H=Fbs7$F^v$\"3iLL3F==:>Fbs7$
Fcv$\"3P+++n0I4?Fbs7$Fhv$\"3CmmTm*ey4#Fbs7$F]w$\"3!)***\\2,G/>#Fbs7$Fb
w$\"3[mmmr6$4G#Fbs7$Fgw$\"39++v$fzcP#Fbs7$F\\x$\"3'QLL`eLpY#Fbs7$Fax$
\"3ELL$=(RDgDFbs7$Ffx$\"3SnmT=;!Gl#Fbs7$F[y$\"3:+++%HVyt#Fbs7$F`y$\"3.
nm;^1JNGFbs7$Fey$\"3.LLL<m[AHFbs7$Fjy$\"3G++vzVV:IFbs7$F_z$\"3j++D[sR/
JFbs7$Fdz$\"3;+++++++KFbs-Fiz6&F[[lF(F(F\\[l-F$6'7$7$$\"\"\"F)F[el7$$
\"3%**************>\"Fbs$\"3%*************R9Fbs-Fiz6&F[[lF(F(F(-%&STYL
EG6#%&POINTG-%'SYMBOLG6#%'CIRCLEG-%*THICKNESSG6#Fgz-%+AXESLABELSG6%%\"
xGQ!6\"-%%FONTG6#%(DEFAULTG-%(SCALINGG6#%,CONSTRAINEDG-%%VIEWG6$;F)Fez
F`gl" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1
" "Curve 2" "Curve 3" }}}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+++++A!\"*
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "3 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }