{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 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 61 "Pujcim si 1500000\njez bud u splacet 20 let mesicnimi splatkami" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "PV:=1500000+subs(N=12*20,simplify(sum(x*(1+xi)^(-i/12 ),i=1..N)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#PVG,&\"(++]\"\"\"\" *(,&*&F'F'*$),&F'F'%#xiGF'\"#?F'!\"\"F'F'F0F'%\"xGF',&F'F0*$)F-#F'\"#7 F'F'F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "solve(subs(xi=0 .06,PV)=0);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$!+$>Q41\"!\"&" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "xxx:=solve(subs(xi=0.05,PV)= 0);\nevalf(xxx);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$xxxG$!+4va2)*! \"'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$!+4va2)*!\"'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 63 "PV:=subs(N=12*20,x=xxx,simplify(sum(x*(1+ xi)^(-i/12),i=1..N)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#PVG,$*($ \"+4va2)*!\"'\"\"\",&*&F*F**$),&F*F*%#xiGF*\"#?F*!\"\"F*F*F2F*,&F*F2*$ )F/#F*\"#7F*F*F2F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "PV:=u napply(PV,xi);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#PVGj+6#%#xiG6\"6$%)operatorG%&arrowGF(,$*($\"+4va 2)*!\"'\"\"\",&*&F1F1*$),&F1F19$F1\"#?F1!\"\"F1F1F9F1,&F1F9*$)F6#F1\"# 7F1F1F9F1F(F(F(6#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "e valf(PV(0.05));\nevalf(PV(0.04));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$ !+++++:!\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$!+4)o&G;!\"$" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "evalf(\n(PV(0.04)-PV(0.05))/ PV(0.05)\n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+LRDr&)!#6" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "evalf(\n(PV(0.03)-PV(0.04))/ PV(0.04)\n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+?tN%)*)!#6" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "xxx:=(\n(PV(0.05+delta)-PV(0 .05))/PV(0.05)\n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$xxxG,&*($\"+1 ]OQl!#7\"\"\",&*&F*F**$),&$\"$0\"!\"#F*%&deltaGF*\"#?F*!\"\"F*F*F5F*,& F*F5*$)F/#F*\"#7F*F*F5F5$\"+++++5!\"*F5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "f:=unapply(xxx,delta);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGj+6#%&deltaG6\"6$%)operatorG%&arrowGF(,&*($\"+1]OQl!#7\"\" \",&*&F1F1*$),&$\"$0\"!\"#F19$F1\"#?F1!\"\"F1F1F " 0 "" {MPLTEXT 1 0 41 "plot(\{f(delta),TP1,TP2\},delta=-0.1..0.1);" }} {PARA 13 "" 1 "" {GLPLOT2D 495 495 495 {PLOTDATA 2 "6'-%'CURVESG6$7S7$ $!3/+++++++5!#=$\"3(**GLB')e'Q!)F*7$$!3_nmm;p0k&*!#>$\"3Gw$R-1>#)o(F*7 $$!3ILL$3C%oo;N'F*7$$! 3#zmmT!R=0vF0$\"3#)pf9W6;LgF*7$$!3U,+]P8#\\4(F0$\"3`qK0N]O.dF*7$$!37om ;/siqmF0$\"3-\"R^sU*Gi`F*7$$!3k++](y$pZiF0$\"35(Q\\Kl2B-&F*7$$!3OLLL$y aE\"eF0$\"3#=G;'4YfsYF*7$$!3.nmm\">s%HaF0$\"3Ol9VqrckVF*7$$!37+++]$*4) *\\F0$\"3u4*4+B,y,%F*7$$!3)4+++Db\\c%F0$\"3O(R?`V6'pOF*7$$!3i+++]1aZTF 0$\"3^Cq8]g1MLF*7$$!3Inm;/#)[oPF0$\"3nO\"oXpe$HIF*7$$!3WMLL$=exJ$F0$\" 3e7.(on7_I+#F*7$$!37NLLL7i)4#F0$\"3kjH%3\\4qo\"F*7$$!3S++]P'psm\"F0$\"3] kMAH1ES8F*7$$!3U++]74_c7F0$\"3Fz))*Rrt+,\"F*7$$!3mLLL$3x%z#)!#?$\"3k^. WoIebmF07$$!3')RLL3s$QM%Fdr$\"3MXA0qh&=\\$F07$$!3/Hrmm;zr)*!#A$\"3J^XC [0$\\$z!#@7$$\"3\\ALLezw5VFdr$!3%\\^B#fiGlMF07$$\"3]#****\\PQ#\\\")Fdr $!3WGdRQ>!4b'F07$$\"3%GLL$e\"*[H7F0$!3wZb509X$))*F07$$\"3[)******pvxl \"F0$!3Eu;W4,jK8F*7$$\"3/*****\\_qn2#F0$!3ko/q$yX%p;F*7$$\"3s)***\\i&p @[#F0$!3m[^GnAL&*>F*7$$\"3y)****\\2'HKHF0$!31::=XO(Q? pUO(F*7$$\"3M****\\P?Wl&*F0$!3'fO^]%QL*o(F*7$$\"3/+++++++5F*$!3T6nm&>g 'Q!)F*-%'COLOURG6&%$RGBG$\"#5!\"\"$\"\"!Fc[lFb[l-F$6$7S7$F($\"3'*GLVf, [48!#<7$F.$\"3/k(e$\"3X+%QQLd--\"Fj[l7$FC$\"3I'HYUxG$3&*F*7$FH$\"3)4gKNPu6)))F *7$FM$\"3a`Ea^:_[#)F*7$FR$\"3\"GnDOxM@h(F*7$FW$\"3==uS4h!f*pF*7$Ffn$\" 33-r268\"4Q'F*7$F[o$\"3Ai)y[*f2beF*7$F`o$\"3[7K*)*4w3G&F*7$Feo$\"3a?$3 zt^Ks%F*7$Fjo$\"35lu_Z%GQ?%F*7$F_p$\"33D#yP(pSZPF*7$Fdp$\"3RP*>r1)eBKF *7$Fip$\"3#o&e_#)y\"fz#F*7$F^q$\"3?F=%z.&)pJ#F*7$Fcq$\"3tenJ*o#p4>F*7$ Fhq$\"3E<\"*F07$Fct$!3;YV#*phn$>\"F*7$Fht$!31FGdqbP^9F* 7$F]u$!3UwsmL\\\"Qo\"F*7$Fbu$!3t%*[Cx#GC#>F*7$Fgu$!3#y-5Vqc$>@F*7$F\\v $!3\"*fj\"3Lf8J#F*7$Fav$!3'3=j-ab!pCF*7$Ffv$!3InUnD2uBEF*7$F[w$!35vDy# Q(Q_FF*7$F`w$!3!eYB$[YMpGF*7$Few$!3C!GbcA$QmHF*7$Fjw$!35k\")o%[P'\\IF* 7$F_x$!38&*Q_u(*37JF*7$Fdx$!3#>^#y,D'z:$F*7$Fix$!3cJY[Yb[&=$F*7$F^y$!3 )yyd;V**\\>$F*7$Fcy$!3'ybq`M?t=$F*7$Fhy$!3iE/%)*yOO;$F*7$F]z$!3:!Hp1U& *37$F*7$Fbz$!3+IMPy/3jIF*7$Fgz$!3m5nmju^#)HF*-F\\[l6&F^[lFb[lF_[lFb[l- F$6$7S7$F($\"3DmB'4(Q;V$\"3yQI()GY!pC\"Fj[l7$FC$\"3%p(>sF&Q'R6 Fj[l7$FH$\"31RH.@#>j/\"Fj[l7$FM$\"3ihp>V\"*oa&*F*7$FR$\"3o'ebRo6En)F*7 $FW$\"3Ev?(y1Cu%yF*7$Ffn$\"35zX<#G'*30(F*7$F[o$\"3Mg4/j/?!R'F*7$F`o$\" 3CO\"Q1[\"3*o&F*7$Feo$\"3V&oRW+cu-&F*7$Fjo$\"3>SUj%pSsU%F*7$F_p$\"3Na9 /E0(=\"RF*7$Fdp$\"3r)3/fAqLL$F*7$Fip$\"3%[C!ou[gqGF*7$F^q$\"3S!GY%Q=ph BF*7$Fcq$\"3%)R:(zV9f$>F*7$Fhq$\"3i@&GKc+P\\\"F*7$F]r$\"3;C0E7%=`4\"F* 7$Fbr$\"3b)3'*3Q*QQ[Eumk\"*F07$Fct$!39_DEW 5k/7F*7$Fht$!3g,b-gxcs9F*7$F]u$!3!ynY^!=T>F*7$Fgu $!3f-pQo#fH?#F*7$F\\v$!3Th;s.Y!)HCF*7$Fav$!3]5(or'G*fi#F*7$Ffv$!3'fe_ \\))p3$GF*7$F[w$!3\\oP#Rl&)\\,$F*7$F`w$!3s$Q$))y3(*)>$F*7$Few$!3m&e[eR T4P$F*7$Fjw$!3Y'[g;1nIa$F*7$F_x$!3FQiLEWh,PF*7$Fdx$!3OT,E#o=o&QF*7$Fix $!3qT1_e$)=/SF*7$F^y$!3B?\\t%\\dT8%F*7$Fcy$!3)zGq_8QqF%F*7$Fhy$!3-^%fT ?9'*R%F*7$F]z$!3oVmu%ei^_%F*7$Fbz$!3'Hniy&pgSYF*7$Fgz$!3%Gg__O%yfZF*-F \\[l6&F^[lF_[lF_[lFb[l-%+AXESLABELSG6$Q&delta6\"Q!Fi^m-%%VIEWG6$;$Fa[l Fa[l$\"\"\"Fa[l%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "TP2:=mtaylor(f(delta),delta=0,3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$TP2G,($\"\"'!#5!\"\"*&$\"+G-mQ!)!\"*\"\"\"%&del taGF.F)*&$\"+oJ9c]!\")F.)F/\"\"#F.F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "TP1:=mtaylor(f(delta),delta=0,2);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%$TP1G,&$\"\"'!#5!\"\"*&$\"+G-mQ!)!\"*\"\"\"%&deltaG F.F)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 6 "Obecne" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "PV:=subs(N=12*T,simplify(sum(x*(1+xi)^(-i/1 2),i=1..N)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#PVG,$*(,&),&\"\"\" F*%#xiGF*,$%\"TG!\"\"F*F*F.F*%\"xGF*,&F*F.*$)F)#F*\"#7F*F*F.F." }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "PV:=unapply(PV,T,x,xi);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#PVGj+6%%\"TG%\"xG%#xiG6\"6$%)operat orG%&arrowGF*,$*(,&),&\"\"\"F39&F3,$9$!\"\"F3F3F7F39%F3,&F3F7*$)F2#F3 \"#7F3F3F7F7F*F*F*6%\"\"!F?F?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "F:=simplify((PV(T,x,xi+delta)-PV(T,x,xi))/PV(T,x,xi));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FG*(,&\"\"\"!\"\"*$),(F'F'%#xiGF'%&delta GF'#F'\"#7F'F'F(,.*&),&F'F'F,F'%\"TGF')F+,$F4F(F'F'*&)F3,&F4F'F.F'F'F5 F'F(F8F'F'F(F)F'*&F2F'F*F'F(F',&F'F(F2F'F(" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 42 "Durace:=simplify(coeftayl(F, delta=0, 1));" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#>%'DuraceG,$*,\"#7!\"\",&\"\"\"F(*$),& F*F*%#xiGF*#F*F'F*F*!\"#F-#!#BF',F*F7F*F.F* F(*(F'F*F,F*F7F*F***F'F*F,F*F7F*F.F*F*)F-F7F**&FBF*F.F*F*F*,&F*F(FBF*F (F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "Durace:=unapply(Dura ce,T,x,xi);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%'DuraceGj+6%%\"TG%\"x G%#xiG6\"6$%)operatorG%&arrowGF*,$*&#\"\"\"\"#7F1**,&F1!\"\"*$),&F1F19 &F1F0F1F1!\"#F8#!#BF2, " 0 "" {MPLTEXT 1 0 45 "Durace(25,1000 0,0.05);\nDurace(25,20000,0.05);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$! +ni(>e*!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$!+ni(>e*!\"*" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "plot(-Durace(T,10000,0.05),T =5..400);" }}{PARA 13 "" 1 "" {GLPLOT2D 495 495 495 {PLOTDATA 2 "6%-%' CURVESG6$7Z7$$\"\"&\"\"!$\"385V@?NSf8%F-7$$\"3%)*\\(=#pSd9\"!#;$\"3S 5a95zQ*)\\F-7$$\"3=LLe*e()4O\"F;$\"3ieHhZ&f!3eF-7$$\"3%*\\PfQzbN!3YGnIR)F-7$$\"3!)\\i:?=PJDF;$\"3 _mY.+/5t'*F-7$$\"31L$3FN:E&HF;$\"3Mrs[EX\\$3\"F;7$$\"3=LL$3;^mP$F;$\"3 Wvbt;88*=\"F;7$$\"3FL$e*opo+QF;$\"37mfPqR3%G\"F;7$$\"3y\\i!*3uqAUF;$\" 3iyt3euno8F;7$$\"3ImT&)[ysWYF;$\"3j#HvH&H5W9F;7$$\"3aK3F*yhsU&F;$\"3KV 8Tj]9i:F;7$$\"3**)\\P%e.`PiF;$\"31@v1`rae;F;7$$\"3)G$3xr7^vqF;$\"3+,Qw ,H^NjreQ=F;7$$\"39L$e9U#zE&*F;$\"3M!G7J;0#o=F;7$$\"3(***\\Py`(y.\"! #:$\"3I:cA$Q!3$*=F;7$$\"3&***\\7Q8UB6Ffq$\"3(zFNr!4A6>F;7$$\"3.+]i@2'e ?\"Ffq$\"3[\"=-e&p)Q#>F;7$$\"3U$3x'zNs!G\"Ffq$\"3]uzrz,MK>F;7$$\"3om;z eFup8Ffq$\"3lk])\\f5'R>F;7$$\"3cmm;!o`^W\"Ffq$\"3A'[!y/j-W>F;7$$\"3'* \\P44X(G`\"Ffq$\"3MbZF;7$$\"3ammT1B_5;Ffq$\"3%>N^*o+.]>F;7$$\"3' *\\PfYUr&p\"Ffq$\"3?h#Q]pT=&>F;7$$\"3!*\\7y>r$ox\"Ffq$\"3-J:#)Qn0`>F;7 $$\"3omTgF.[h=Ffq$\"3aP/Aa*[R&>F;7$$\"3d;a8:#4#R>Ffq$\"37C]WXv_a>F;7$$ \"3FLe9@.0B?Ffq$\"3ICOy?(o\\&>F;7$$\"32$3xrmP,6#Ffq$\"3/`+H.aGb>F;7$$ \"3%)\\i!zXZf=#Ffq$\"3oH-)=^ya&>F;7$$\"3AL3x3T#yE#Ffq$\"3M&em,NEc&>F;7 $$\"3#)***\\2q5CN#Ffq$\"3i4+uQBtb>F;7$$\"3w*\\(oy@;NCFfq$\"3!=SU(**R!e &>F;7$$\"3*)\\Pf)[G_^#Ffq$\"3sZUkDB&e&>F;7$$\"3p*\\7[ZGTg#Ffq$\"3[&f7h A*)e&>F;7$$\"33mmTm!4So#Ffq$\"3/r//_>\"f&>F;7$$\"3++]7[')HpFFfq$\"3uq: jJ(Gf&>F;7$$\"3%H3xco$eYGFfq$\"3![z%*pFRf&>F;7$$\"3++]PXm2JHFfq$\"3'f3 2fHZf&>F;7$$\"3/;/wNzd5IFfq$\"3;aoL/D&f&>F;7$$\"3)*\\(o9pzO4$Ffq$\"3!) =O`vi&f&>F;7$$\"3Em;HZo#\\<$Ffq$\"3'z%QS:)ef&>F;7$$\"3]\\P%)*3&)*fKFfq $\"3Ab[**Q1'f&>F;7$$\"3ILL$oG1>M$Ffq$\"3s$Qj&R='f&>F;7$$\"33Le*Ga#oDMF fq$\"3U9*e7oif&>F;7$$\"3_;/E*3l(3NFfq$\"35puR^K'f&>F;7$$\"3q***\\2K4^e $Ffq$\"35!RL[hjf&>F;7$$\"3Qm\"zaU3En$Ffq$\"3m+$R9!R'f&>F;7$$\"3MLL$ymo 3v$Ffq$\"3e_HVwS'f&>F;7$$\"3&)\\P44/JMQFfq$\"3gk->0U'f&>F;7$$\"3o\\iS- [<9RFfq$\"3)y2t(*Gkf&>F;7$$\"$+%F*$\"3!['=(=Nkf&>F;-%'COLOURG6&%$RGBG$ \"#5!\"\"$F*F*Fd]l-%+AXESLABELSG6$Q\"T6\"Q!Fi]l-%%VIEWG6$;F(Fi\\l%(DEF AULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve \+ 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "22 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }