{VERSION 5 0 "IBM INTEL NT" "5.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 0 0 0 1 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 Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 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 "moi" -1 256 "Times" 1 12 0 0 1 1 0 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 257 "" 1 14 122 134 128 0 0 0 0 0 0 0 0 0 0 1 }{CSTYLE "
" -1 258 "" 1 10 0 0 0 0 0 0 0 0 0 0 0 0 0 1 }{CSTYLE "" -1 259 "" 1 
14 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }{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 "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 
1 2 2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Out
put" -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 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 }{PSTYLE "R3 Font 0" -1 256 1 {CSTYLE "" -1 -1 "Monaco" 1 9 0 
0 255 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 }{PSTYLE "R3 \+
Font 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 1 10 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 "Normal" -1 258 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 "Normal" -1 259 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 }
{PSTYLE "R3 Font 0" -1 260 1 {CSTYLE "" -1 -1 "Geneva" 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 261 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 }}
{SECT 0 {EXCHG {PARA 259 "" 0 "" {TEXT 257 35 "TP 6 -  FONCTIONS FL
\310CHES - CORRIG\311" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 
"" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 39 "1) Il s'agit d
e la valeur absolue, de l" }{TEXT 259 0 "" }{TEXT -1 66 "a factorielle
, de la suite de Fibonacci et de la s\351rie harmonique." }}{PARA 0 "
" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 108 "k:=
x->if x=1 then 1 elif is(x,integer) then k(x-1)+1/x else ERROR(`Entrez
 un entier, c'est une suite !`) fi:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 
-1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "k(5.2);k(10);" }}
{PARA 8 "" 1 "" {TEXT -1 50 "Error, (in k) Entrez un entier, c'est une
 suite !\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"%\"Q(\"%?D" }}}
{EXCHG {PARA 261 "" 1 "" {TEXT -1 161 "Rem : une petite modification d
e la fonction k permet d'obtenir la fonction continue affine par morce
aux H telle que si x est entier H(x) = 1 + 1/2 + .. + 1/x ; " }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 126 "entier:=x->if is(x,integer)
 then x-1 else floor(x) fi:\n\nH:=x->if x=1 then 1 else  H(entier(x))+
(x-entier(x))/(entier(x)+1) fi:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 
58 "Comparaison entre la fonction H et ln+ constante d'Euler :" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "plot([H,ln+evalf(gamma)],1..
10,color=[black,red]);" }}{PARA 13 "" 1 "" {GLPLOT2D 361 293 293 
{PLOTDATA 2 "6&-%'CURVESG6$7S7$$\"\"\"\"\"!F(7$$\"+)Quh>\"!\"*$\"+%>(3
)4\"F.7$$\"+tY'oO\"F.$\"+OBV$=\"F.7$$\"+^P#)e:F.$\"+w=Tz7F.7$$\"+f_0_<
F.$\"+Iw-w8F.7$$\"+r$oV%>F.$\"+'=%=s9F.7$$\"+VsmA@F.$\"+\"3*)3a\"F.7$$
\"+)R&G2BF.$\"+m%GCg\"F.7$$\"+ex@)\\#F.$\"+'esgm\"F.7$$\"+'zP&)o#F.$\"
+*f7&H<F.7$$\"+[`I%)GF.$\"+\\%oZz\"F.7$$\"+9vtcIF.$\"+7x^Z=F.7$$\"+#Hb
3D$F.$\"+cr/'*=F.7$$\"+Q,xXMF.$\"+oexW>F.7$$\"+3ngLOF.$\"+5]t\"*>F.7$$
\"+3.=/QF.$\"+5%yV.#F.7$$\"+=)3q+%F.$\"+(4NZ3#F.7$$\"+q6$)yTF.$\"+n&*4
>@F.7$$\"+89qyVF.$\"+;O2f@F.7$$\"+X/ibXF.$\"+AuX%>#F.7$$\"+j'G(\\ZF.$
\"+m!zKB#F.7$$\"+*elX$\\F.$\"+^kCqAF.7$$\"+JNUF^F.$\"+)eqXI#F.7$$\"+Et
_/`F.$\"+()y3MBF.7$$\"+%pdb\\&F.$\"+#GEfO#F.7$$\"+eX)Rp&F.$\"+Eu**)R#F
.7$$\"+FdrmeF.$\"+afyFCF.7$$\"+@,F`gF.$\"+<+hdCF.7$$\"+l!**fC'F.$\"+CF
9&[#F.7$$\"+OnaMkF.$\"+0\"y?^#F.7$$\"+.j(ph'F.$\"+s%R\"QDF.7$$\"+MK`>o
F.$\"+wh2nDF.7$$\"+X'R:+(F.$\"+*f\\If#F.7$$\"+Q.(e>(F.$\"+N4M<EF.7$$\"
+GG'>P(F.$\"+'\\_$REF.7$$\"+K%yWc(F.$\"+ZpTjEF.7$$\"+81iXxF.$\"+?(fgo#
F.7$$\"+'Qm\\$zF.$\"+Tzs4FF.7$$\"+)['3?\")F.$\"+'3+7t#F.7$$\"+y+*QJ)F.
$\"+=Qt_FF.7$$\"+qfa+&)F.$\"+iLZtFF.7$$\"+z&G9p)F.$\"+TDo%z#F.7$$\"+$e
I2)))F.$\"+(4;d\"GF.7$$\"+l%zY0*F.$\"++iVMGF.7$$\"+9X/a#*F.$\"+0FPaGF.
7$$\"+!**eBV*F.$\"+`T?sGF.7$$\"+8%zCi*F.$\"+&>;7*GF.7$$\"+<*[W!)*F.$\"
+YJT4HF.7$\"#5$\"+a#o*GHF.-%'COLOURG6&%$RGBGF*F*F*-F$6$7S7$F)$\"+\\m:s
d!#57$F,$\"+#>TMc(F_[l7$F2$\"+@AN(*))F_[l7$F7$\"+'>Z6-\"F.7$F<$\"+(>0!
Q6F.7$FA$\"+WG:U7F.7$FF$\"+'4*))H8F.7$FK$\"+YtG89F.7$FP$\"+YKz#\\\"F.7
$FU$\"+SJ@m:F.7$FZ$\"+b(*\\O;F.7$Fin$\"+SQc%p\"F.7$F^o$\"+$zLhv\"F.7$F
co$\"+(4jV\"=F.7$Fho$\"+.9Wn=F.7$F]p$\"+3iJ8>F.7$Fbp$\"+(pg_'>F.7$Fgp$
\"+[sC2?F.7$F\\q$\"+ky'R0#F.7$Faq$\"+)RxN4#F.7$Ffq$\"+eJIN@F.7$F[r$\"+
2.[t@F.7$F`r$\"+i*==@#F.7$Fer$\"+LjxXAF.7$Fjr$\"+Rd:\"G#F.7$F_s$\"+Ufi
;BF.7$Fds$\"+T1^YBF.7$Fis$\"+2V\"yP#F.7$F^t$\"+un:4CF.7$Fct$\"+mq*)QCF
.7$Fht$\"+zT&oY#F.7$F]u$\"+%p1q\\#F.7$Fbu$\"+RdMBDF.7$Fgu$\"+iHs]DF.7$
F\\v$\"+i'**[d#F.7$Fav$\"+l!z1g#F.7$Ffv$\"+mKMCEF.7$F[w$\"+$y%\\[EF.7$
F`w$\"+qkbrEF.7$Few$\"+%GV^p#F.7$Fjw$\"+egM<FF.7$F_x$\"+%)HbRFF.7$Fdx$
\"+\"\\*4hFF.7$Fix$\"+dt\\!y#F.7$F^y$\"+mjF-GF.7$Fcy$\"+))=O@GF.7$Fhy$
\"+KwJTGF.7$F]z$\"+>>0gGF.7$Fbz$\"+e2!)zGF.-Ffz6&Fhz$\"*++++\"!\")$F*F
*Fedl-%+AXESLABELSG6$Q!6\"Fidl-%%VIEWG6$;F($FbzF*%(DEFAULTG" 1 2 0 1 
10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" }}
}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 128 "Comparaison entre la fonction f
actorielle et la fonction Phi continue affine par morceaux telle que P
hi(n) = n! pour n naturel :" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
81 "Phi:=x->if x<=1 and x>=0 then 1 elif x<=0 then Phi(x+1)/(x+1) else
 Phi(x-1)*x fi:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "plot([Ph
i,factorial],-0.8..3,color=[black,red]);" }}{PARA 13 "" 1 "" 
{GLPLOT2D 291 217 217 {PLOTDATA 2 "6&-%'CURVESG6$7]o7$$!3U+++++++!)!#=
$\"3)3+++++++&!#<7$$!3'om;a.FHz(F*$\"3*3tsS\"y)3`%F-7$$!3ILL$32aee(F*$
\"3gc(=sm^A9%F-7$$!3%3+]i5\"yytF*$\"3y8iqW!>]\"QF-7$$!3EnmmT\"3<<(F*$
\"3.0a.(*HqNNF-7$$!3_+]7$)>O6oF*$\"3#o/!fB_8OJF-7$$!3yLLeCe,^kF*$\"3:b
BA*o2x\"GF-7$$!3%***\\(=))od/'F*$\"3r8*32lO*GDF-7$$!3Anm;R>_ScF*$\"33s
-i!e_QH#F-7$$!3Mnmmc()eK_F*$\"3!pq0lWuv4#F-7$$!3\"pmmTdbY#[F*$\"3/hsB[
&QA$>F-7$$!3BMLezom7SF*$\"3))GsF)o#>q;F-7$$!3gnm\"zT\\)fKF*$\"3%>\"[Dy
jk$[\"F-7$$!3W++DT0N![#F*$\"3xdjLC#\\)H8F-7$$!3Snm\"zo\">u;F*$\"3q42W#
e%3,7F-7$$!3v9+]i>=1()!#>$\"3m,b^>WO&4\"F-7$$!3/wm\"HU6Ld%Fap$\"3Sfqnn
[#z/\"F-7$$!33tLLL)3WS%!#?$\"3,0)oM*QU/5F-7$$\"3=&***\\PPz*>$Fap$\"\"
\"\"\"!7$$\"3oFLLe$G+%oFapFbq7$$\"3r*****\\B6O]\"F*Fbq7$$\"3k)****\\-&
eEBF*Fbq7$$\"3!*)****\\ws'>JF*Fbq7$$\"3jJL37C()RQF*Fbq7$$\"3qmmm^%fip%
F*Fbq7$$\"3ammm1;t@aF*Fbq7$$\"3s)**\\()=GcE'F*Fbq7$$\"3Ulmmc'>E,(F*Fbq
7$$\"3g)**\\()o(=KyF*Fbq7$$\"3P++Dm-h7')F*Fbq7$$\"3!ommTN**oU*F*Fbq7$$
\"3Wn\"H#[A%Qh*F*Fbq7$$\"3(pm\"HU^y+)*F*Fbq7$$\"3=;HK*ecU*)*F*Fbq7$$\"
3]mTNO!Gx)**F*Fbq7$$\"3oT&Q$[*>\"35F-Fft7$$\"3rm;/$4nu,\"F-Fit7$$\"3'*
*\\7js&zd5F-F\\u7$$\"3?LLefV7)4\"F-F_u7$$\"3CL$37f/>=\"F-Fbu7$$\"3'***
\\7Hb$[D\"F-Feu7$$\"38LL3SHgL8F-Fhu7$$\"3()*****HQx\\T\"F-F[v7$$\"3_**
*\\(*R'e%\\\"F-F^v7$$\"3'***\\(o@7;d\"F-Fav7$$\"3))***\\UDOrl\"F-Fdv7$
$\"34mmm0M)Rt\"F-Fgv7$$\"3t****\\UT.;=F-Fjv7$$\"35L$3_I%Q!*=F-F]w7$$\"
3dmTN)[E5$>F-F`w7$$\"3/++]r'o;(>F-Fcw7$$\"3'H$3_)z4*4?F-$\"3LA#p'*fF)H
?F-7$$\"37m;aD4:[?F-$\"3W<bD)Grn9#F-7$$\"3E+]P=p4G@F-$\"32s@iv&*p+CF-7
$$\"3fmm;R(ei?#F-$\"3#Gi#)\\))=8m#F-7$$\"3I**\\(=#p3)G#F-$\"3s4/=S[DZH
F-7$$\"3aLLL(=(*oO#F-$\"3n6J23^INKF-7$$\"33LLem?\\ZCF-$\"3E@]S\\`sUNF-
7$$\"3Im;az&>u_#F-$\"3y1*3::I/'QF-7$$\"3I+++jY'3g#F-$\"3s/@CKBjjTF-7$$
\"3Imm\"p,T]o#F-$\"3u=#3cC/W_%F-7$$\"3oKLL^$H.w#F-$\"3ak*)\\w()3f[F-7$
$\"34+]()=CgSGF-$\"3[,NC$o>%G_F-7$$\"3Y**\\7()RV<HF-$\"3irq5#3()Rf&F-7
$$\"\"$Fdq$\"\"'Fdq-%'COLOURG6&%$RGBGFdqFdqFdq-F$6$7Z7$F($\"3O/))*>rV3
f%F-7$F/$\"3Dwg3\"\\4k8%F-7$F4$\"3a1G:yE0iPF-7$F9$\"3#*)ehDtB([MF-7$F>
$\"3OghHNs&H=$F-7$FC$\"330OQ7L=1GF-7$FH$\"3rTtDKdj4DF-7$FM$\"3nrZG@')[
WAF-7$FR$\"3qCK-6o4K?F-7$Ffn$\"3)R(Q&p\"Gu8<F-7$F[o$\"39v4eyb5#\\\"F-7
$F`o$\"3G**Q.]V<T8F-7$Feo$\"3]nR8i3\"GA\"F-7$Fjo$\"36?K?tXaH6F-7$F_p$
\"3gdE\"[*3Te5F-7$Fjp$\"3@Lg>e:c-5F-7$Ffq$\"3?A:!3'Qv['*F*7$Fiq$\"3C=/
*oK;#H$*F*7$F\\r$\"3$GgsJT'\\,\"*F*7$F_r$\"3[3Xl<#ys&*)F*7$Fbr$\"3[tD+
Jt`#)))F*7$Fer$\"3q.&z'*30j&))F*7$Fhr$\"3%)=-xW\"4K)))F*7$F[s$\"3g0'Rl
1;y'*)F*7$F^s$\"3[T%\\*RZy)3*F*7$Fas$\"3YD]eQjOq#*F*7$Fds$\"3#))>Ua)R!
3\\*F*7$Fgs$\"3!f'*4#\\J3r(*F*7$Fit$\"35S9=24^25F-7$F_u$\"3qGSCkZ`X5F-
7$Fbu$\"3qq*30c164\"F-7$Feu$\"3l!)p$=j^h8\"F-7$Fhu$\"3e0]Bex$3>\"F-7$F
[v$\"3Koz_\"4[WD\"F-7$F^v$\"33&RZ@D*HC8F-7$Fav$\"33zM\"=vJ(*R\"F-7$Fdv
$\"3shM6f!QM\\\"F-7$Fgv$\"3y0<l77\\(e\"F-7$Fjv$\"3+Aq))3>L*p\"F-7$F]w$
\"3hnt8(\\[>\"=F-7$Fcw$\"3y+$\\<:+([>F-7$F[x$\"3[*Q63B@=4#F-7$F`x$\"3K
3Wdhy8eAF-7$Fex$\"31c`#Ry$=RCF-7$Fjx$\"3c\">h`$ei]EF-7$F_y$\"3]Kd=i>/y
GF-7$Fdy$\"3+dMNKPvPJF-7$Fiy$\"3G3WsMf$eU$F-7$F^z$\"3l6WE!3w1s$F-7$Fcz
$\"3-Tyei*3')4%F-7$Fhz$\"3WV%*R*o=uZ%F-7$F][l$\"3q:T&o=1$H\\F-7$$\"3y*
****H?=!zGF-$\"3'H\")))zmQ\\;&F-7$Fb[l$\"3*o,#HQB=9aF-7$$\"3u*\\iN*pre
HF-$\"3'p^#G_]<)p&F-Ff[l-F\\\\l6&F^\\l$\"*++++\"!\")$FdqFdqF`gl-%+AXES
LABELSG6$Q!6\"Fdgl-%%VIEWG6$;$F_gl!\"\"Fg[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" }}}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 14 "\n3) Les impots" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 253 "impot:=(R,N)->\nif R<4121*N then 0\nelif
 R<8104*N then 0.075*R-309.08*N\nelif R<14264*N then 0.21*R- 1403.12*N
\nelif R<23096*N then 0.31*R- 2829.52*N\nelif R<37579*N then 0.41*R- 5
139.12*N\nelif R<46343*N then 0.4675*R- 7299.91*N\nelse 0.5275*R- 1008
0.49*N fi:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "plot3d(impot,
0..200000,1..6,grid=[20,7]);" }}{PARA 13 "" 1 "" {GLPLOT3D 258 207 
207 {PLOTDATA 3 "6#-%%GRIDG6%;$\"\"!F($\"'++?F(;$\"\"\"F($\"\"'F(X,%)a
nythingG6\"6\"[gl'!%\"!!#gs\"5\"(0000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000
0000040893B40227E1D1C406BDA76ED7F0310000000000000000000000000000000000
0000000000000000000000000000000000000000000000040ACE19771B7C7F5409CE2A
9F2B4BA1E408795DF4DC9BEF8407F12AD8A826CE0406DF338F2E2B7980000000000000
000000000000000000040BE803F9885A8B140B1FA0535B70FFD40A693D9EA1532D6409
AE2A2C319549C4090144C2BD59A5040881C0FCF22AC1840800F87469A239040C830267
7A574F640BEB92DA1812AF140B5833EB2923C0240AEB65EDAD008A040A593D65247801
64098E29B937DEF2040945DA8B0C6552840D144AABEC990FA40C7BE9D1A688E4840C12
1338F2E2B7A40B90C782F6D680440B36C71E5C56F3540ADB65B430255E440A493D2BA7
9CD5C40D6B0D32A93ABEE40D0164113F0E8D440C7CF355B1504DB40C2E5D04D9BC17D4
0BC95B1AC48940A40B77DB45E22DA1A40B2EC7019DE95D640DC1CFB965DC6E040D4920
CCE3CB8B040D01E8D3447241C40C945648380CEF540C4AA6D0C09577D40C0101D8D624
4A140BB8EF6D68044FE40E0C4920113F0E940D960502C8D904440D4557FBB03C5CC40D
026D9549D5F6540CB0A0141EE64F740C66F09CA76ED8040C218BEC990FA1340E37AA63
6F8FE6240DEC1324BCFDAA140D88C7241C0677A40D45DCBDB5A011340D0B4CABBE9B93
840CCCE9E005BFAF840C833A688E4838240E630BA6CDE0BDB40E216AD5BCCFACA40DD0
C0660A6B6E140D894BE6216A2C140D46617FBB03C5A40D197191B20843840CE933ABEC
990FA40E8E6CEA2C3195440E4CCC191B2084240E0ED24DF7BC73A40DCCBB0E8D344714
0D89D0A826CDE0A40D4C6E336130AF440D279677A574F3940EB9CE2D8A826CD40E782D
5C79715BC40E368C8B68604AA40E08151B7C7F31040DCD3FD09297FB840D8A556A2C31
95240D5A9319549D5F540EE52F70E8D344740EA38E9FD7C233640E61EDCEC6B122440E
2C2FFF9885A8C40E08577C7F310B440DCDC49297FBB0240D8D8FBB03C5CB340F08485A
23920DF40ECEEFE336130AE40E8D4F122501F9C40E52A21A8B0C65640E2A0F10B51618
B40E0899DD81E2E5840DCE49549D5F64A40F1DF8FBD2BA79C40EFA51269463E2840EB8
B0558352D1640E7914357D9322040E4BC6A4EAFB26340E2A5171B7C7F3040E08DC3E84
94BFD40F33A99D81E2E5840F12D934F95A5D040EE41198E1A3A8E40EA270C7D09297D4
0E6FFFCC2BD59A540E4C0905EDAD00740E2A93D2BA79CD440F495A3F310B51540F2889
D6A882C8D40F07B96E1FFA40440ECDD20B2EE36F740E9671E71E5C56F40E6DC09A2392
0DF40E4C4B66F05EDAC40F5F0AE0E033BD140F3E3A7857AB34940F1D6A0FCF22AC040E
F9334E8D3446F40EBCE40210E313940E8F782E59771B540E6E02FB2643E8240F74BB82
8F5C28E40F53EB1A06D3A0640F331AB17E4B17D40F124A48F5C28F440EE3561D0369D0
140EB3CF98BF258BD40E8FBA8F5C28F5A" 1 2 0 1 10 0 2 1 1 4 2 1.000000 
45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 81 "plot(\{R/2,seq('impot'(R,k),k=1..4)\},R=0..400000,sca
ling=constrained,color=black);" }{TEXT -1 0 "" }}{PARA 0 "" 0 "" 
{TEXT -1 0 "" }}{PARA 13 "" 1 "" {GLPLOT2D 337 202 202 {PLOTDATA 2 "6+
-%'CURVESG6#7S7$$\"\"!F)F(7$$\"3fnmmm;')=()!#9$\"3!QLLL$3VfVF-7$$\"3dL
LLe'40j\"!#8$\"3'ymm;H[D:)F-7$$\"3%pmmm6hO[#F3$\"3ZLLLe0$=C\"F37$$\"3@
nmm;yYULF3$\"3gLLL3RBr;F37$$\"3wLLLeF>(>%F3$\"3)omm\"zjf)4#F37$$\"3wmm
m\">K'*)\\F3$\"3QLL$e4;[\\#F37$$\"38+++Dt:5eF3$\"31++]i'y]!HF37$$\"3Kn
mm\"fX(emF3$\"3mLL$ezs$HLF37$$\"3!3++]U7Y](F3$\"3S++]7iI_PF37$$\"3%RLL
LV!pu$)F3$\"3'pmmm@Xt=%F37$$\"3jnmm;c0T\"*F3$\"3#QLL$3y_qXF37$$\"3@+++
I,Q+5!#7$\"3/,++]1!>+&F37$$\"3/+++]*3q3\"F`o$\"3@+++]Z/NaF37$$\"3?+++q
=\\q6F`o$\"3+,++]$fC&eF37$$\"3smm;fBIY7F`o$\"3gLL$ez6:B'F37$$\"3SLLLj$
[kL\"F`o$\"3+nmm;=C#o'F37$$\"3RLLL`Q\"GT\"F`o$\"3'pmmmEpS1(F37$$\"3&**
***\\s]k,:F`o$\"3w****\\i`A3vF37$$\"3ULLL`dF!e\"F`o$\"32nmmm(y8!zF37$$
\"3I++]sgam;F`o$\"3],+]i.tK$)F37$$\"37++]<ep[<F`o$\"3h++](3zMu)F37$$\"
3nLLLe/TM=F`o$\"3Komm\"H_?<*F37$$\"3`LL$eDBJ\">F`o$\"3mnm;zihl&*F37$$
\"3ymmmTc-)*>F`o$\"3!RLL$3#G,***F37$$\"3wmm;f`@'3#F`o$\"3QLLezw5V5F`o7
$$\"3-++]nZ)H;#F`o$\"3-++v$Q#\\\"3\"F`o7$$\"3!pmm;$y*eC#F`o$\"3XLL$e\"
*[H7\"F`o7$$\"3'*******R^bJBF`o$\"3)*******pvxl6F`o7$$\"3)******\\5a`T
#F`o$\"3******\\_qn27F`o7$$\"3;++]7RV'\\#F`o$\"33++Dcp@[7F`o7$$\"3E+++
:#fke#F`o$\"39++]2'HKH\"F`o7$$\"3-LLL`4NnEF`o$\"3^mmmwanL8F`o7$$\"39++
+],s`FF`o$\"33+++v+'oP\"F`o7$$\"3^mm;zM)>$GF`o$\"3ELLeR<*fT\"F`o7$$\"3
n+++qfa<HF`o$\"3M+++&)Hxe9F`o7$$\"3cLL$eg`!)*HF`o$\"3ymm\"H!o-*\\\"F`o
7$$\"3W++]#G2A3$F`o$\"3A++DTO5T:F`o7$$\"3ILLL$)G[kJF`o$\"3mmmmT9C#e\"F
`o7$$\"3+++]7yh]KF`o$\"3+++D1*3`i\"F`o7$$\"3;nmm')fdLLF`o$\"3eLLL$*zym
;F`o7$$\"38nmm,FT=MF`o$\"3cLL$3N1#4<F`o7$$\"35ML$e#pa-NF`o$\"31nm\"HYt
7v\"F`o7$$\"3u+++Sv&)zNF`o$\"3Q+++q(G**y\"F`o7$$\"3uLLLGUYoOF`o$\"3(om
mT6KU$=F`o7$$\"3qmmm1^rZPF`o$\"3OLLL`v&Q(=F`o7$$\"38++]sI@KQF`o$\"31++
DOl5;>F`o7$$\"3K++]2%)38RF`o$\"3;++v.Uac>F`o7$$\"'++SF)$\"'++?F)-F$6#7
UF'7$F.$\"3k,++]7t(y\"!#;7$F+$\"3[-+++&4%yU!#:7$$\"3;++]7z>^7F3$\"3L++
D;cRC7F-7$F1$\"3<ML$3%*f]A#F-7$F7$\"3#[LL$y0*Q/&F-7$F<$\"3uMLL[!)*\\c)
F-7$FA$\"3$Q$3_9m>K7F37$FF$\"3_mT5\")>)Ri\"F37$FK$\"3#)*\\P*))*3o0#F37
$FP$\"3<nTg*HRW]#F37$FU$\"3W+v=aSj]HF37$FZ$\"3]LLe.-g4MF37$Fin$\"3Tn;z
Py&Q\"QF37$F^o$\"3=,+v&=c*oUF37$Fdo$\"3<++D6K#fs%F37$Fio$\"3m++D9cHm^F
37$F^p$\"3ImTgWf>mbF37$Fcp$\"3]LLe;hrTgF37$Fhp$\"3%RLLj2WXW'F37$F]q$\"
3,*\\PuvGJ\"pF37$Fbq$\"3NLL$))f0zK(F37$Fgq$\"3%)*\\PC`\")Hy(F37$F\\r$
\"3i*\\7tV@j@)F37$Far$\"3_L$3x;m%o')F37$Ffr$\"3gL3_uhn$3*F37$F[s$\"3#o
m\"zfi`J&*F37$F`s$\"3cmTg>qt'***F37$Fes$\"3$*\\i&[cp,/\"F`o7$Fjs$\"3om
T?1i!R3\"F`o7$F_t$\"3!)***\\jV!4H6F`o7$Fdt$\"3))*\\(Q!R%Ht6F`o7$Fit$\"
3$)\\P%)))R1;7F`o7$F^u$\"39+D\"fL_NE\"F`o7$Fcu$\"39LL)ysAiI\"F`o7$Fhu$
\"3'***\\7zCy^8F`o7$F]v$\"3s;/E&QmIR\"F`o7$Fbv$\"3R+]<*f+#Q9F`o7$Fgv$
\"3e$3xqPo1[\"F`o7$F\\w$\"35](=:Wf]_\"F`o7$Faw$\"3WL$e4#)f%o:F`o7$Ffw$
\"3+]P4'*f*Qh\"F`o7$F[x$\"31nm'HVcwl\"F`o7$F`x$\"3'o;H,!yS-<F`o7$Fex$
\"3y$3xLg)yY<F`o7$Fjx$\"3S++N_*pvy\"F`o7$F_y$\"3lLeW!)*4V$=F`o7$Fdy$\"
3emmw=[6w=F`o7$Fiy$\"3!*\\Pu&\\(o?>F`o7$F^z$\"3+]i&\\B\\L'>F`o7$Fcz$\"
34++++^>4?F`o-F$6#7SF'7$F+$\"3G.+++DYvNF][l7$F1$\"3A0++DGIyhFa[l7$F7$
\"3q+++X$[%4CF-7$F<$\"3PommJ-h-ZF-7$FA$\"3![LL3bdAN(F-7$FF$\"3WLLe)>Dz
,\"F37$FK$\"33++D.0Ma8F37$FP$\"3@LLe#phAq\"F37$FU$\"33++D%4n!\\?F37$FZ
$\"39MLexd=bCF37$Fin$\"3kn;z+:Y8GF37$F^o$\"3-,+v&=24E$F37$Fdo$\"3k***
\\7@uyr$F37$Fio$\"3'3+]UhY#eTF37$F^p$\"3]mTgWp9eXF37$Fcp$\"3qLLe;rmL]F
37$Fhp$\"3:MLLw]\\OaF37$F]q$\"3%**\\Puvz]!fF37$Fbq$\"3GML$))fc)>jF37$F
gq$\"3y+vVKD$\\x'F37$F\\r$\"3b+DJPCF3sF37$Far$\"3YM$3x;</m(F37$Ffr$\"3
_M3_uriv!)F37$F[s$\"3vn;zfs[B&)F37$F`s$\"3]nTg>!)o))*)F37$Fes$\"3?+Dc[
mk$R*F37$Fjs$\"3en;/iI,J)*F37$F_t$\"3!****\\j`&GG5F`o7$Fdt$\"3)**\\(Q!
\\*[s5F`o7$Fit$\"3#*\\P%))3f_6\"F`o7$F^u$\"3A+D\"fVZF;\"F`o7$Fcu$\"3BL
L)y#yT07F`o7$Fhu$\"3!***\\7zv(4D\"F`o7$F]v$\"3m;/E&[hAH\"F`o7$Fbv$\"3>
+]<*p&RP8F`o7$Fgv$\"3Q$3xqZj)z8F`o7$F\\w$\"3\"*\\(=:aaUU\"F`o7$Faw$\"3
CL$e4#\\ln9F`o7$Ffw$\"3!)\\P4'4\"48:F`o7$F[x$\"3'ommH`^ob\"F`o7$F`x$\"
3mm\"H,!Hg,;F`o7$Fex$\"3g$3xLq$)fk\"F`o7$Fjx$\"3?++N_]w'o\"F`o7$F_y$\"
3XLeW!30Nt\"F`o7$Fdy$\"3Qmmw=*4`x\"F`o7$Fiy$\"3q\\Pu&f#))>=F`o7$F^z$\"
3#)\\i&\\LWD'=F`o7$Fcz$\"3!********>!R3>F`o-F$6#7SF'7$F+F(7$F1$\"3M++]
PCUcHFa[l7$F7$\"3\"3++]MGj+\"F-7$F<$\"3Y,++:C#)4GF-7$FA$\"3f++]#zWZg%F
-7$FF$\"3?nm;%z*HzpF-7$FK$\"3\"4++vqFH_*F-7$FP$\"3$om;M8b`@\"F37$FU$\"
3>++D%4b^`\"F37$FZ$\"3Immmxq)=*=F37$Fin$\"3kLL$G!o41AF37$F^o$\"3%3++I`
A)fDF37$Fdo$\"3a*****\\p+]\"HF37$Fio$\"3g++D#\\w?G$F37$F^p$\"3&z;/\"H0
\\OOF37$Fcp$\"3mMLe)4Bz0%F37$Fhp$\"3iLLLwgWGWF37$F]q$\"3U*\\PuvIq*[F37
$Fbq$\"3wLL$))f2=J&F37$Fgq$\"3E+vVKN)ow&F37$F\\r$\"3.+DJPMA+iF37$Far$
\"3%RL3x;oBl'F37$Ffr$\"3+M3_u\"yv1(F37$F[s$\"3An;zf#Qa^(F37$F`s$\"3)p;
/'>!R1)zF37$Fes$\"3o*\\i&[wf&Q)F37$Fjs$\"31n;/iS'H#))F37$F_t$\"3S)***
\\jj![F*F37$Fdt$\"3?**\\(Q!f%or*F37$Fit$\"3()\\P%))=aW,\"F`o7$F^u$\"3=
+D\"f`U>1\"F`o7$Fcu$\"3=LL)y#Hh/6F`o7$Fhu$\"3')**\\7zE<]6F`o7$F]v$\"3i
;/E&ec9>\"F`o7$Fbv$\"3H+]<*z!fO7F`o7$Fgv$\"3[$3xqde!z7F`o7$F\\w$\"3+](
=:k\\MK\"F`o7$Faw$\"3ML$e4-]oO\"F`o7$Ffw$\"3!*\\P4'>'G79F`o7$F[x$\"3'p
mmHjYgX\"F`o7$F`x$\"3wm\"H,+)z+:F`o7$Fex$\"3o$3xL!)y^a\"F`o7$Fjx$\"3G+
+N_,'fe\"F`o7$F_y$\"3aLeW!=+Fj\"F`o7$Fdy$\"3[mmw=]]u;F`o7$Fiy$\"3z\\Pu
&px!><F`o7$F^z$\"3!*\\i&\\VR<w\"F`o7$Fcz$\"3*********H&e2=F`o-F$6#7SF'
Fj]m7$F1F(7$F7$\"3q,++v$eUE'Fa[l7$F<$\"3d,++:Cq19F-7$FA$\"3p++]#zC;?$F
-7$FF$\"3k****\\-wul[F-7$FK$\"3Y++]2xS$p'F-7$FP$\"3)ymmTLJSK*F-7$FU$\"
3K++v^=i%>\"F37$FZ$\"3ULLLMgMk9F37$Fin$\"30nm;T#>>q\"F37$F^o$\"3%4++I`
5f/#F37$Fdo$\"3k*****\\p)3,CF37$Fio$\"3k+++n'oLu#F37$F^p$\"3kLLes;>aIF
37$Fcp$\"3lmmm*G!zBMF37$Fhp$\"3&omm')z))ot$F37$F]q$\"3y)**\\sz'4,TF37$
Fbq$\"3IML$o9DyY%F37$Fgq$\"3k-v$*)))Q6([F37$F\\r$\"3%4]7o%*)=b_F37$Far
$\"3'\\L3F*[!fl&F37$Ffr$\"3?M3_u\"H&fgF37$F[s$\"3Vn;zf#*Q2lF37$F`s$\"3
!z;/'>+fspF37$Fes$\"3g+Dc['[vP(F37$Fjs$\"3*zmT?1:\\\"yF37$F_t$\"3)y***
\\jtvm#)F37$Fdt$\"3o)*\\(Q!pz3()F37$Fit$\"3k*\\P%))G\\O\"*F37$F^u$\"3k
-]7fjP6'*F37$Fcu$\"3FLL)y-3Q+\"F`o7$Fhu$\"3%***\\7zxO\\5F`o7$F]v$\"3q;
/E&o^14\"F`o7$Fbv$\"3Q+]<**eyN6F`o7$Fgv$\"3c$3xqn`#y6F`o7$F\\w$\"34](=
:uWEA\"F`o7$Faw$\"3WL$e47XgE\"F`o7$Ffw$\"3**\\P4'H\"[68F`o7$F[x$\"3/nm
'HtT_N\"F`o7$F`x$\"3'o;H,5$***R\"F`o7$Fex$\"3x$3xL!RPW9F`o7$Fjx$\"3Q++
N__:&[\"F`o7$F_y$\"3kLeW!G&*=`\"F`o7$Fdy$\"3emmw=,qt:F`o7$Fiy$\"3*)\\P
u&zs#=;F`o7$F^z$\"3+]i&\\`M4m\"F`o7$Fcz$\"33++++/y1<F`o-%(SCALINGG6#%,
CONSTRAINEDG-%+AXESLABELSG6$Q\"R6\"Q!F^`n-%'COLOURG6&%$RGBGF)F)F)-%%VI
EWG6$;F(Fcz%(DEFAULTG" 1 2 0 1 10 0 2 6 1 4 1 1.000000 45.000000 
45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" "Curve 4" "Curve 5" }}}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 123 "Remarquer que ces courbes sont co
ntinues, alors que la plupart des gens pensent que changer de tranche \+
introduit un saut..." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 22 "On peut a
ussi \351crire :" }{MPLTEXT 1 0 81 "plot(\{R->R/2,seq(unapply('impot'(
R,k),R),k=1..4)\},0..400000,scaling=constrained):" }}}{EXCHG {PARA 0 "
" 0 "" {TEXT -1 35 "impot \351gal  \340 la moiti\351 du revenu :" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "solve(0.5275*R- 10080.49*N=R
/2,R);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&$\"+FFjlO!\"%\"\"\"%\"NG
F(F(" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 49 "ce qui fait un revenu men
suel de 30500 N euros..." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 88 
"plot(\{'impot'(50000,parts),'impot'(80000,parts)\},parts=0..10,xtickm
arks=11,color=black);" }}{PARA 13 "" 1 "" {GLPLOT2D 235 201 201 
{PLOTDATA 2 "6(-%'CURVESG6#7S7$$\"\"!F)$\"&vj#F)7$$\"3emmm;arz@!#=$\"3
WeWR0Sx<C!#87$$\"3[LL$e9ui2%F/$\"3e&ocBf\"fEAF27$$\"3nmmm\"z_\"4iF/$\"
31@8vtpe6?F27$$\"39ommT&phN)F/$\"3yX#p\\;d^z\"F27$$\"3KLLe*=)H\\5!#<$
\"3Y5()G4gvz:F27$$\"3smm\"z/3uC\"FE$\"3jkKp^L!pU\"F27$$\"3!****\\7LRDX
\"FE$\"33]')>2E_.8F27$$\"3%om;zR'ok;FE$\"3#*\\Q(Qo(\\%>\"F27$$\"33++D1
J:w=FE$\"3%*\\3'[SAe3\"F27$$\"3oLLL3En$4#FE$\"3*z*>1D_OS(*!#97$$\"3#pm
mT!RE&G#FE$\"3VLB)y2+Q.*F[o7$$\"3D+++D.&4]#FE$\"3J)*fSO5^B%)F[o7$$\"3;
+++vB_<FFE$\"3$)****[*3;2\"yF[o7$$\"33+++v'Hi#HFE$\"3=**R**4Y<?sF[o7$$
\"3&om;z*ev:JFE$\"3uKosrj!Ro'F[o7$$\"3_LLL347TLFE$\"3MlEXn:BYgF[o7$$\"
3nLLLLY.KNFE$\"3\"GLx_cJTa&F[o7$$\"33++D\"o7Tv$FE$\"3!**\\%o9%HDB&F[o7
$$\"3?LLL$Q*o]RFE$\"3gLtX7(3n&\\F[o7$$\"3m++D\"=lj;%FE$\"3K*\\%)oo*3aY
F[o7$$\"3S++vV&R<P%FE$\"3C+NP6[#fO%F[o7$$\"3CML$e9Ege%FE$\"3yK$eU*\\Dl
SF[o7$$\"3]LLeR\"3Gy%FE$\"3aLy=Vi9*y$F[o7$$\"3emm;/T1&*\\FE$\"3Wn;;acK
\"\\$F[o7$$\"3=nm\"zRQb@&FE$\"3cm^6jP(>=$F[o7$$\"3:++v=>Y2aFE$\"3!3]jD
.#o7HF[o7$$\"3Znm;zXu9cFE$\"3Lm'zgeR=i#F[o7$$\"34+++]y))GeFE$\"3Y+!3*z
3P@BF[o7$$\"3H++]i_QQgFE$\"3v+5[q3UF?F[o7$$\"3b++D\"y%3TiFE$\"3,]7\"e^
05#=F[o7$$\"3+++]P![hY'FE$\"3?+&pX'HW^<F[o7$$\"3iKLL$Qx$omFE$\"3sL$f$=
z$*)o\"F[o7$$\"3Y+++v.I%)oFE$\"3)***\\4S/?A;F[o7$$\"3?mm\"zpe*zqFE$\"3
u;zkljsh:F[o7$$\"3;,++D\\'QH(FE$\"3e**4)*GAh&\\\"F[o7$$\"3%HL$e9S8&\\(
FE$\"3u$es(yRSL9F[o7$$\"3s++D1#=bq(FE$\"3o\\A\"GVy$o8F[o7$$\"3\"HLL$3s
?6zFE$\"3jL$[g2/[I\"F[o7$$\"3a***\\7`Wl7)FE$\"3V]7G;wCQ7F[o7$$\"3enmmm
*RRL)FE$\"3ImE5Ne9u6F[o7$$\"3%zmmTvJga)FE$\"3gm@U0Df36F[o7$$\"3]MLe9tO
c()FE$\"3!He3/*>eV5F[o7$$\"31,++]Qk\\*)FE$\"3<)**>%)yS%Q)*!#:7$$\"3![L
L3dg6<*FE$\"3%)H$ow!px`\"*Fay7$$\"3%ymmmw(Gp$*FE$\"37lmyq`ST&)Fay7$$\"
3C++D\"oK0e*FE$\"3[*\\#z)e*[))yFay7$$\"35,+v=5s#y*FE$\"37+vCvecjsFay7$
$\"#5F)$\"3s-+++++#f'Fay-F$6#7S7$F($\"&+A%F)7$F-$\"32eWR0SF+SF27$F4$\"
3e&ocBf\"44QF27$F9$\"31@8vtp3%f$F27$F>$\"3yX#p\\;dwP$F27$FC$\"3k5()G4g
DiJF27$FI$\"3)>l0Zc^D'HF27$FN$\"3'*oFnz\"pdv#F27$FS$\"31-lETX\">a#F27$
FX$\"3=ca\"y6D/P#F27$Fgn$\"3YT,(*Qyj6AF27$F]o$\"3*)**=[cad0@F27$Fbo$\"
3k*fylhJZ*>F27$Fgo$\"3#****=7kKM)=F27$F\\p$\"3?+9Eba<w<F27$Fap$\"3')\\
)*)\\lv(y;F27$Ffp$\"33+mvry&Hc\"F27$F[q$\"3_m!Hkt.1[\"F27$F`q$\"3'*\\
\\h3jw<9F27$Feq$\"3umqgPX9i8F27$Fjq$\"3%)\\\\BR'=6I\"F27$F_r$\"3!*\\oh
_v+V7F27$Fdr$\"3MmT)*HZP#=\"F27$Fir$\"3c;')Gr[pE6F27$F^s$\"3WLyf@mjm5F
27$Fcs$\"3<$oK#zHD/5F27$Fhs$\"3Q*\\e;Ny%*\\*F[o7$F]t$\"3Lm'zgeR=#*)F[o
7$Fbt$\"3P,!3*z3P@')F[o7$Fgt$\"3v+5[q3UF$)F[o7$F\\u$\"3s+Dt@\"4I/)F[o7
$Fau$\"3(3+BcO=ss(F[o7$Ffu$\"3=Mt*eKmMW(F[o7$F[v$\"3^***HyX+09(F[o7$F`
v$\"3Gn\"z<Nof'oF[o7$Fev$\"3!***RVYA$ec'F[o7$Fjv$\"3gMyXhvU$G'F[o7$F_w
$\"3s*\\YWHL#))fF[o7$Fdw$\"3'[LV=%pi*p&F[o7$Fiw$\"3%>]7t$G[(R&F[o7$F^x
$\"3Lm1(R:#[1^F[o7$Fcx$\"37lO4D>*)3[F[o7$Fhx$\"3'G$=c$*ew8XF[o7$F]y$\"
33**z=@ddUUF[o7$Fcy$\"39KB&)z6wJRF[o7$Fhy$\"3%pmM)[\\w`OF[o7$F]z$\"3G+
XG%)HOdLF[o7$Fbz$\"3g*\\rT[oO2$F[o7$Fgz$\"3F+++++?4HF[o-%*AXESTICKSG6$
\"#6%(DEFAULTG-%+AXESLABELSG6$Q&parts6\"Q!Fjdl-%'COLOURG6&%$RGBGF)F)F)
-%%VIEWG6$;F(FgzFedl" 1 2 0 1 10 0 2 6 1 4 2 1.000000 45.000000 
45.000000 0 0 "Curve 1" "Curve 2" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 
30 "4) Les op\351rateurs fonctionnels" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 23 "T:=f->(x->f(x+1)+f(x));" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%\"TGf*6#%\"fG6\"6$%)operatorG%&arrowGF(f*6#%\"xGF(F)F(,&-T$6#,
&9$\"\"\"F5F5F5-F16#F4F5F(F(6$F'F4F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 33 "T(f)(x);(T@T)(f)(x);(T@@3)(f)(x);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#,&-%\"fG6#,&%\"xG\"\"\"F)F)F)-F%6#F(F)" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#,(-%\"fG6#,&%\"xG\"\"\"\"\"#F)F)*&F*F)-F%6#,&F(F
)F)F)F)F)-F%6#F(F)" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,*-%\"fG6#,&%\"x
G\"\"\"\"\"$F)F)*&F*F)-F%6#,&F(F)\"\"#F)F)F)*&F*F)-F%6#,&F(F)F)F)F)F)-
F%6#F(F)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }{XPPEDIT 18 0 "T^n*
f(x) = sum(k*parmi*n*f(x+k),k = 0 .. n);" "6#/*&)%\"TG%\"nG\"\"\"-%\"f
G6#%\"xGF(-%$sumG6$**%\"kGF(%&parmiGF(F'F(-F*6#,&F,F(F1F(F(/F1;\"\"!F'
" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 13 "AUTRE
 M\311THODE" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 86 "T:=(f,x)->f(
x+1)+f(x):t:=(f,n,x)->if n=0 then f(x) else T(unapply(t(f,n-1,x),x),x)
 fi:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "t(f,3,x);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#,*-%\"fG6#,&%\"xG\"\"\"\"\"$F)F)*&F*F)-F%6#,
&F(F)\"\"#F)F)F)*&F*F)-F%6#,&F(F)F)F)F)F)-F%6#F(F)" }}}{EXCHG {PARA 
261 "" 1 "" {TEXT -1 12 "\nOp\351rateur U" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 31 "U:=f->(x->f(x/2)+f((x+1)/2)/2);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%\"UGf*6#%\"fG6\"6$%)operatorG%&arrowGF(f*6#%\"xGF(F
)F(,&-T$6#,$*&#\"\"\"\"\"#F69$F6F6F6*&F5F6-F16#,&*&F5F6F8F6F6F5F6F6F6F
(F(6$F'F8F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "U(f)(x);
(U@U)(f)(x);(U@@3)(f)(x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&-%\"fG6
#,$*&\"\"#!\"\"%\"xG\"\"\"F,F,*&#F,F)F,-F%6#,&*&F)F*F+F,F,F.F,F,F," }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#,*-%\"fG6#,$*&\"\"%!\"\"%\"xG\"\"\"F,F
,*&#F,\"\"#F,-F%6#,&*&F)F*F+F,F,F.F,F,F,*&F.F,-F%6#,&*&F)F*F+F,F,#F,F)
F,F,F,*&F9F,-F%6#,&*&F)F*F+F,F,#\"\"$F)F,F,F," }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#,2-%\"fG6#,$*&\"\")!\"\"%\"xG\"\"\"F,F,*&#F,\"\"#F,-F%6
#,&*&F)F*F+F,F,F.F,F,F,*&F.F,-F%6#,&*&F)F*F+F,F,#F,\"\"%F,F,F,*&F9F,-F
%6#,&*&F)F*F+F,F,#\"\"$F:F,F,F,*&F.F,-F%6#,&*&F)F*F+F,F,#F,F)F,F,F,*&F
9F,-F%6#,&*&F)F*F+F,F,#\"\"&F)F,F,F,*&F9F,-F%6#,&*&F)F*F+F,F,#FAF)F,F,
F,*&FGF,-F%6#,&*&F)F*F+F,F,#\"\"(F)F,F,F," }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" 
{XPPEDIT 18 0 "U^n*f(x) = sum(f((x+k)/(2^n)),k = 0 .. 2^n-1)/(2^n);" "
6#/*&)%\"UG%\"nG\"\"\"-%\"fG6#%\"xGF(*&-%$sumG6$-F*6#*&,&F,F(%\"kGF(F(
)\"\"#F'!\"\"/F5;\"\"!,&)F7F'F(F(F8F()F7F'F8" }}{PARA 0 "" 0 "" {TEXT 
-1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 260 "" 0 "" 
{TEXT 258 22 "5) D\351riv\351es partielles" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 76 "f:=(x,y)->x^3*y;\nDiff('f'(y,x),x): '%'=value(%);'D
[1](f)(y,x)':'%'=value(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*
6$%\"xG%\"yG6\"6$%)operatorG%&arrowGF)*&)9$\"\"$\"\"\"9%F1F)F)F)" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%%DiffG6$-%\"fG6$%\"yG%\"xGF+*$)F*\"
\"$\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/--&%\"DG6#\"\"\"6#%\"fG6
$%\"yG%\"xG,$*(\"\"$F))F-\"\"#F)F.F)F)" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 35 }{VIEWOPTS 1 1 0 1 1 1803 1 1 
1 1 }{PAGENUMBERS 0 1 2 33 1 1 }