{VERSION 2 3 "IBM INTEL NT" "2.3" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 } {CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }{CSTYLE " " -1 256 "" 1 24 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 257 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 1 12 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 265 "" 1 12 0 0 2 0 0 2 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 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading 1" 0 3 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }1 0 0 0 6 6 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 }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 }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 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {PARA 256 "" 0 "" {TEXT 256 23 "Laboratory Exercise 2.4" } {TEXT 257 35 "\nTangent Lines and Rates of Change\n" }{TEXT 258 14 "(C CH Text 2.2)" }{MPLTEXT 1 0 2 "\n\n" }}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 19 "The function is ..." }}{PARA 0 "" 0 "" {TEXT -1 4 "Let " } {XPPEDIT 18 0 "f(x) = 3x-2x^2" "/-%\"fG6#%\"xG,&*&\"\"$\"\"\"F&F*F**& \"\"#F**$F&\"\"#F*!\"\"" }{TEXT -1 1 "." }}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 9 "Problem 1" }}{PARA 0 "" 0 "" {TEXT -1 87 "One good way to \+ do this would be by by hand using the limit of the difference quotient :" }}{PARA 0 "" 0 "" {XPPEDIT 18 0 "limit( (f(0.5+h)-f(0.5))/h,h=0);" "-%&limitG6$*&,&-%\"fG6#,&$\"\"&!\"\"\"\"\"%\"hGF.F.-F(6#$\"\"&!\"\"! \"\"F.F/F5/F/\"\"!" }{TEXT -1 80 "\nHowever, the worked example on pag e 75 (a) allows us to let Maple do the work:\n" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "f:=x->3*x-2*x^2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#> %\"fG:6#%\"xG6\"6$%)operatorG%&arrowGF(,&9$\"\"$*$F-\"\"#!\"#F(F(" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "limit( (f(0.5+h)-f(0.5))/h,h=0);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"\"\"\"\"!" }}{PARA 0 "" 0 "" {TEXT -1 37 "\nThe instantaneous rate of change of " }{XPPEDIT 18 0 "f " "I\"fG6\"" }{TEXT -1 4 " at " }{XPPEDIT 18 0 "x=0.5" "/%\"xG$\"\"&! \"\"" }{TEXT -1 56 " is 1. That is, for every unit we move in the\npo sitive " }{XPPEDIT 18 0 "x" "I\"xG6\"" }{TEXT -1 41 " direction we wil l go up one unit in the " }{XPPEDIT 18 0 "y" "I\"yG6\"" }{TEXT -1 12 " direction. " }{MPLTEXT 1 0 1 "\n" }}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 9 "Problem 2" }}{PARA 3 "" 0 "" {TEXT 265 65 "Since we have the slo pe (m=1), all we need is the y value f(0.5)." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "f(0.5);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#$\"$+\"!\"#" }}{PARA 0 "" 0 "" {TEXT -1 27 "\nThe lin e has the equation " }{XPPEDIT 18 0 "y-1=1(x-0.5)" "/,&%\"yG\"\"\"\"\" \"!\"\"-\"\"\"6#,&%\"xGF%$\"\"&!\"\"F'" }{TEXT -1 4 " or " }{XPPEDIT 18 0 "y=x+0.5" "/%\"yG,&%\"xG\"\"\"$\"\"&!\"\"F&" }{TEXT -1 3 ". " }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 9 "P roblem 3" }}{PARA 0 "" 0 "" {TEXT -1 57 "The function and the tangent \+ line are graphed as follows:" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "plot([f(x),x+0.5],x=-1..1.5);" }}{PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6$7S7$$!\"\"\"\"!$!\"&F*7$$!1ML$e9r]X *!#;$!1,a?^()[CY!#:7$$!1n;aj9$4)*)F0$!1`\">\"Q?U2VF37$$!1LL3-=rZ%)F0$! 1ghWM-fhRF37$$!1LLe9w&4\"zF0$!1!op>H_\\i$F37$$!1n;/EXvwtF0$!1C?c/lN,LF 37$$!1L$3-))z9)oF0$!1Un*3FR:,$F37$$!1,](=n^'ojF0$!1Dg\"R)**y@FF37$$!1L $3_+%GQeF0$!1H>2/k>LCF37$$!1**\\PMsh4`F0$!1SR#Q(esc@F37$$!1mm;z%=ew%F0 $!1HtFfg+%)=F37$$!1LLeR-%oG%F0$!1=#pm0#f`;F37$$!1****\\(=Cwu$F0$!1+ZE( *4=09F37$$!1++]iS>1KF0$!10#yg#=Xn6F37$$!1++]7eU%o#F0$!1cK1Ee]%\\*F07$$ !1L$3_D51@#F0$!1[9r0.>4wF07$$!1mm;Hx>Z;F0$!1iVHf_C%[&F07$$!1mmm;M\"*p6 F0$!1K$*\\I(zMy$F07$$!1)**\\(oH=Zh!#<$!1zv_21t>>F07$$!1qmm;awK7Faq$!1) f]9Y!pGPFaq7$$\"1;+DJ&H\"fTFaq$\"1t&fC9UJ@\"F07$$\"15+v$f)[$H*Faq$\"1! oSwr3`h#F07$$\"1OLek`1l9F0$\"1n'\\#*y7f'RF07$$\"1M$e*[.-d>F0$\"1-wi<`2 0^F07$$\"1mmTg-m([#F0$\"1P()*p1!HDiF07$$\"1o;z%*f%)QIF0$\"1KFO))4ipsF0 7$$\"1+](oza'=NF0$\"162ru!y(z!)F07$$\"1pm\"zWho.%F0$\"1M[\"QFM8&))F07$ $\"1+++D'>Ad%F0$\"1sH::/iN&*F07$$\"1,+DcJ'f4&F0$\"1^y2P@T45F37$$\"1,]7 `>r-cF0$\"10PMhf+`5F37$$\"1++v$4q`;'F0$\"1ioEg_P*3\"F37$$\"1KLLeM%4n'F 0$\"1%R9]I`76\"F37$$\"1,+]P4v5sF0$\"1dof*pEL7\"F37$$\"1m;zWn*)*p(F0$\" 1M%Ge#3?C6F37$$\"1.+]7BmM#)F0$\"1V=tDa?96F37$$\"1K$ek.Nyt)F0$\"1C.X)Gb V4\"F37$$\"1-]i:bzj#*F0$\"1A7e20yi5F37$$\"1KL$3-=!y(*F0$\"1s^$zn77-\"F 37$$\"1+D\"G8O;.\"F3$\"1)R))Qx@Om*F07$$\"1nmm\"*\\[$3\"F3$\"1j;m1_vD!* F07$$\"1n;aQz]O6F3$\"1>a))oABi#)F07$$\"1MekG=4*=\"F3$\"1e\"H.KnRR(F07$ $\"1++]i4TP7F3$\"1lkps5h)\\'F07$$\"1M$3F9!z#H\"F3$\"1LLd>sdd`F07$$\"1n mmT>KU8F3$\"1)f/%[V4LUF07$$\"1+DJqJ8&R\"F3$\"1i3D^Q1EHF07$$\"1+voa-oX9 F3$\"1\"peZmz0d\"F07$$\"1+++++++:F3F*-%'COLOURG6&%$RGBG$\"#5F)F*F*-F$6 $7S7$F($!1+++++++]F07$F.$!1ML$e9r]X%F07$F5$!1n;aj9$4)RF07$F:$!1LL3-=rZ MF07$F?$!1LLe9w&4\"HF07$FD$!1n;/EXvwBF07$FI$!1L$3-))z9)=F07$FN$!1,](=n ^'o8F07$FS$!1HL3_+%GQ)Faq7$FX$!1#**\\PMsh4$Faq7$Fgn$\"1ULL3_\"=M#Faq7$ F\\o$\"1tm;/wfJrFaq7$Fao$\"1,+]7eP_7F07$Ffo$\"1++]Pf!Qz\"F07$F[p$\"1++ ](=ubJ#F07$F`p$\"1n;zW(*Q*y#F07$Fep$\"1ML$3F-GN$F07$Fjp$\"1MLL$e'3IQF0 7$F_q$\"1+]7.Ad*F07$Fgt$\"1+]i:jf45F37$F\\u$\"1+DJ&>r-1\"F37$Fau$\"1+]P4q` ;6F37$Ffu$\"1LL$eM%4n6F37$F[v$\"1++v$4v5A\"F37$F`v$\"1n\"zWn*)*p7F37$F ev$\"1++DJiYB8F37$Fjv$\"1Lek.Nyt8F37$F_w$\"1+Dc^&zjU\"F37$Fdw$\"1LL3-= !yZ\"F37$Fiw$\"1+D\"G8O;`\"F37$F^x$\"1nmm\"*\\[$e\"F37$Fcx$\"1n;aQz]O; F37$Fhx$\"1MekG=4*o\"F37$F]y$\"1++]i4TPKU=F37$F\\z$\"1+DJqJ8&*=F37$Faz$\"1+voa-oX>F37$Ffz$\"\"#F*-Fiz 6&F[[lF*F\\[lF*-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;F($\"#:F)%(DEFAULTG " 2 374 374 374 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 20 0 0 0 0 0 1 }}{PARA 0 "" 0 "" {TEXT -1 74 "If we zoom in quite a bit then the graphs are virtuall y indistinguishable:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "plot([f(x), x+0.5],x=0.49..0.51);" }}{PARA 13 "" 1 "" {INLPLOT "6&-%'CURVESG6$7S7$ $\"1+++++++\\!#;$\"1++++++)*)*F*7$$\"1LL$3VfV!\\F*$\"1F#Rr+ID!**F*7$$ \"1n;H[D:3\\F*$\"1/YTd`Y1**F*7$$\"1LLe0$=C\"\\F*$\"1aR%\\>%)3\"**F*7$$ \"1LL3RBr;\\F*$\"1S6>s\\K:**F*7$$\"1m;zjf)4#\\F*$\"1!33-KP(>**F*7$$\"1 L$e4;[\\#\\F*$\"1E'\\_g@Q#**F*7$$\"1+]i'y]!H\\F*$\"1%H\\%GS/G**F*7$$\" 1L$ezs$HL\\F*$\"1$R7Ey.C$**F*7$$\"1+]7iI_P\\F*$\"1`T**F*7$$\"1LL3y_qX\\F*$\"1Ixr%p:^%**F*7$$\"1++]1!> +&\\F*$\"1]xb'Q>&\\**F*7$$\"1++]Z/Na\\F*$\"158!p[9 L+\"Fds7$$\"1++]2goP]F*$\"1un/'>SP+\"Fds7$$\"1L$eR<*fT]F*$\"1`.d2`7/5F ds7$$\"1++])Hxe/&F*$\"1Z'>`jXX+\"Fds7$$\"1n;H!o-*\\]F*$\"1h\"zCYS\\+\" Fds7$$\"1+]7k.6a]F*$\"1&Q#yxCN05Fds7$$\"1mm;WTAe]F*$\"1)Q(R8Yv05Fds7$$ \"1+]i!*3`i]F*$\"1`o\"o)[<15Fds7$$\"1LLL*zym1&F*$\"1Bxoe*yl+\"Fds7$$\" 1ML3N1#42&F*$\"1@(y(o9*p+\"Fds7$$\"1n;HYt7v]F*$\"1]fE_)*R25Fds7$$\"1++ +xG**y]F*$\"1mw?!\\ux+\"Fds7$$\"1nmT6KU$3&F*$\"10w\\KJ?35Fds7$$\"1LLLb dQ(3&F*$\"1I'G,&ee35Fds7$$\"1,]i`1h\"4&F*$\"1[`7:K**35Fds7$$\"1+]P?Wl& 4&F*$\"1bZnYCQ45Fds7$$\"1+++++++^F*$\"1+++++!)45Fds-%'COLOURG6&%$RGBG$ \"#5!\"\"\"\"!F_[l-F$6$7S7$F($\"1+++++++**F*7$F.$\"1ML$3VfV!**F*7$F3$ \"1n;H[D:3**F*7$F8$\"1LLe0$=C\"**F*7$F=$\"1LL3RBr;**F*7$FB$\"1m;zjf)4# **F*7$FG$\"1L$e4;[\\#**F*7$FL$\"1+]i'y]!H**F*7$FQ$\"1L$ezs$HL**F*7$FV$ \"1+]7iI_P**F*7$Fen$\"1nm;_M(=%**F*7$Fjn$\"1LL3y_qX**F*7$F_o$\"1****\\ 1!>+&**F*7$Fdo$\"1++]Z/Na**F*7$Fio$\"1++]$fC&e**F*7$F^p$\"1M$ez6:B'**F *7$Fcp$\"1mm;=C#o'**F*7$Fhp$\"1nmm#pS1(**F*7$F]q$\"1,]i`A3v**F*7$Fbq$ \"1mmm(y8!z**F*7$Fgq$\"1+]i.tK$)**F*7$F\\r$\"1,](3zMu)**F*7$Far$\"1nm \"H_?<***F*7$Ffr$\"1m;zihl&***F*7$F[s$\"1LL3#G,*****F*7$F`s$\"1Lezw5V+ 5Fds7$Ffs$\"1+v$Q#\\\"3+\"Fds7$F[t$\"1L$e\"*[H7+\"Fds7$F`t$\"1++qvxl,5 Fds7$Fet$\"1+]_qn2-5Fds7$Fjt$\"1+Dcp@[-5Fds7$F_u$\"1+]2'HKH+\"Fds7$Fdu $\"1nmwanL.5Fds7$Fiu$\"1++v+'oP+\"Fds7$F^v$\"1LeR<*fT+\"Fds7$Fcv$\"1++ &)Hxe/5Fds7$Fhv$\"1n\"H!o-*\\+\"Fds7$F]w$\"1+DTO5T05Fds7$Fbw$\"1nmT9C# e+\"Fds7$Fgw$\"1+D1*3`i+\"Fds7$F\\x$\"1LL$*zym15Fds7$Fax$\"1L$3N1#425F ds7$Ffx$\"1n\"HYt7v+\"Fds7$F[y$\"1++q(G**y+\"Fds7$F`y$\"1n;9@BM35Fds7$ Fey$\"1LL`v&Q(35Fds7$Fjy$\"1+DOl5;45Fds7$F_z$\"1+v.Uac45Fds7$Fdz$\"1++ ++++55Fds-Fiz6&F[[lF_[lF\\[lF_[l-%+AXESLABELSG6$%\"xG%!G-%%VIEWG6$;$\" #\\!\"#$\"#^Fcel%(DEFAULTG" 2 374 374 374 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 1 }}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 9 "Problem 4" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "g:=h->((f(0 .5+h)-f(0.5))/h);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gG:6#%\"hG6\" 6$%)operatorG%&arrowGF(*&,&-%\"fG6#,&$\"\"&!\"\"\"\"\"9$F5F5-F/6#F2F4F 5F6F4F(F(" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot(g(h),h=-0.5..0.5) ;" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$7S7$$!1+++++++]!#;$\"\"# \"\"!7$$!1LLLe%G?y%F*$\"1nmm\"p0k&>!#:7$$!1mmT&esBf%F*$\"1LL3F37$ $!1LL$3s%3zVF*$\"1nm;Wp\"e(=F37$$!1LL$e/$QkTF*$\"1nm;4m(G$=F37$$!1nmT5 =q]RF*$\"1ML3i.9!z\"F37$$!1LL3_>f_PF*$\"1nmT!R=0v\"F37$$!1++vo1YZNF*$ \"1++vL@\\4s%Ha\" F37$$!1+++v'\\!*\\#F*$\"1+++N*4)*\\\"F37$$!1+++DwZ#G#F*$\"1+++Db\\c9F3 7$$!1+++D.xt?F*$\"1+++lSv99F37$$!1LL3-TC%)=F*$\"1nmT?)[oP\"F37$$!1nmm \"4z)e;F*$\"1LLL=exJ8F37$$!1nmmm`'zY\"F*$\"1LLLtIf$H\"F37$$!1++v=t)eC \"F*$\"1++vju<\\7F37$$!1nmm;1J\\5F*$\"1LLLB@')47F37$$!1)***\\(=[jL)!#< $\"1++vjpsm6F37$$!1****\\iXg#G'F[r$\"1++D\"4_c7\"F37$$!1lmmT&Q(RTF[r$ \"1LL$3x%z#3\"F37$$!1nm;/'=><#F[r$\"1LL3s$QM/\"F37$$!1EMLLe*e$\\!#>$\" 1_m;zr)4+\"F37$$\"1em;zRQb@F[r$\"1Ym;/K#*o&*F*7$$\"1&***\\(=>Y2%F[r$\" 12+]ih2&=*F*7$$\"1hmm\"zXu9'F[r$\"1jmmT3^q()F*7$$\"1'******\\y))G)F[r$ \"1(******HCAM)F*7$$\"1****\\i_QQ5F*$\"12++v%HK#zF*7$$\"1***\\7y%3T7F* $\"1/+]P/$y^(F*7$$\"1****\\P![hY\"F*$\"1.++DRqnqF*7$$\"1LLL$Qx$o;F*$\" 1QLLL_CjmF*7$$\"1+++v.I%)=F*$\"13++]#*RJiF*7$$\"1mm\"zpe*z?F*$\"1om;/E 3SeF*7$$\"1+++D\\'QH#F*$\"10++],F7aF*7$$\"1KLe9S8&\\#F*$\"1VL$3(>t4]F* 7$$\"1***\\i?=bq#F*$\"1.+](ej*)e%F*7$$\"1LLL3s?6HF*$\"1NLL$e&exTF*7$$ \"1++DJXaEJF*$\"1-+]P4\"pu$F*7$$\"1nmmm*RRL$F*$\"1smmm+7KLF*7$$\"1mm;a <.YNF*$\"1qmm\"\\Oz!HF*7$$\"1LLe9tOcPF*$\"1KL$3Pls[#F*7$$\"1+++]Qk\\RF *$\"1-+++Br+@F*7$$\"1LL$3dg6<%F*$\"1QLLe)ywl\"F*7$$\"1mmmmxGpVF*$\"1qm mmWUh7F*7$$\"1++D\"oK0e%F*$\"1!****\\PY$*Q)F[r7$$\"1++v=5s#y%F*$\"17++ D'zbM%F[r7$$\"1+++++++]F*F--%'COLOURG6&%$RGBG$\"#5!\"\"F-F--%+AXESLABE LSG6$%\"hG%!G-%%VIEWG6$;$!\"&F_[l$\"\"&F_[l%(DEFAULTG" 2 374 374 374 2 0 1 0 2 9 0 4 2 1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 6 0 0 0 0 0 1 }}{PARA 0 "" 0 "" {TEXT -1 255 " The graph above could be used to find the limit as h goes to zero by r eading off the value at h=0. Now it should\nbe pointed out that this \+ value does not exist, but the graph is only missing that one point so \+ we can make a very\ngood guess as to the value." }}}}{MARK "1" 0 } {VIEWOPTS 1 1 0 1 1 1803 }