{VERSION 4 0 "IBM INTEL NT" "4.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 257 "" 1 36 0 0 0 0 0 1 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 "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 4 1 0 1 0 2 2 0 1 }{PSTYLE "Heading 2" -1 4 1 {CSTYLE "" -1 -1 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 2 1 0 1 0 2 2 0 1 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 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 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 "Map le 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 "Normal" -1 256 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 "Normal" -1 257 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 257 "" 0 "" {TEXT 257 50 "Assist\351es par Ordina teur\n(MAO)\nTh\350me 07 - 21/03/07" }{TEXT -1 1 "\n" }{MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 11 "Loi n ormale" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 161 "La loi normale centr\351e r\351duite moyenne = 0, ecart- type = 1. Si X est une valeur al\351atoire de loi normale centr\351e r \351duite, alors la probabilit\351 que a<= X <= b est" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "P := (a, b) -> C*int(exp(-x^2/2),x=a..b);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>% \"PGR6$%\"aG%\"bG6\"6$%)operatorG%&arrowGF)*&%\"CG\"\"\"-%$intG6$-%$ex pG6#,$*$)%\"xG\"\"#F/#!\"\"F:/F9;9$9%F/F)F)F)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 79 "La probabilit\351 pour que X soit compris entre -infin i et +infini est de 1, donc " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "C : = 1/int(exp(-x^2/2),x=-infinity..infinity);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"CG,$*&*$-%%sqr tG6#\"\"#\"\"\"F,*$-F)6#%#PiGF,!\"\"#F,F+" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 26 "plot(exp(-x^2/2),x=-4..4);" }}{PARA 13 "" 1 "" {GLPLOT2D 398 105 105 {PLOTDATA 2 "6%-%'CURVESG6$7]o7$$!\"%\"\"!$\"3a= ^-ziiaL!#@7$$!3ommmmFiDQ!#<$\"32I1#*QS!pj'F-7$$!35LLLo!)*Qn$F1$\"3!QVN #*HGB<\"!#?7$$!3nmmmwxE.NF1$\"3/u*=qG.E;#F97$$!3YmmmOk]JLF1$\"3Guu?)fF &*)QF97$$!3_LLL[9cgJF1$\"3M4tj,UgunF97$$!3smmmhN2-IF1$\"30'3yK<3S5\"!# >7$$!3!******\\`oz$GF1$\"3yl\\.+]r#y\"FN7$$!3!omm;)3DoEF1$\"3a>CGeU]WG FN7$$!3?+++:v2*\\#F1$\"3fv+Gsf$QS%FN7$$!3BLLL8>1DBF1$\"3!Q1g#R;r+nFN7$ $!3kmmmw))yr@F1$\"3m3*fR#4xd%*FN7$$!3;+++S(R#**>F1$\"3EL-'f!=Tb8!#=7$$ !30++++@)f#=F1$\"3a]y#3rFz)=Fgo7$$!3-+++gi,f;F1$\"3=TE@SeWDDFgo7$$!3qm mm\"G&R2:F1$\"3Z!)RkTCi5KFgo7$$!3XLLLtK5F8F1$\"3%pQ'[WZLXTFgo7$$!3_LLL $yP2D\"F1$\"35C@PY?6uXFgo7$$!3eLLL$HsV<\"F1$\"3phn4J@*y,&Fgo7$$!3!pmmT 2Tb3\"F1$\"3MCz]Q3rZbFgo7$$!3+-++]&)4n**Fgo$\"3G4RBjAE&3'Fgo7$$!3cpmmT 2jW0!pT\"** Fgo7$$!3m0++]-6&)))FN$\"3k=sz4_gg**Fgo7$$!3')RLLe4**RYFN$\"3!)3c(Q.T#* )**Fgo7$$!3gSnmmmr[RF9$\"3SMt[Q?#*****Fgo7$$\"3n=L$3Fr)4=FN$\"3m5k5***Fgo7$$\"38/L$e9d$>iFN$\"3-@`Y) [y1)**Fgo7$$\"3'oHLL3+TU)FN$\"3I/LrX,ek**Fgo7$$\"3AGL$efeLG\"Fgo$\"3DY n!oo()z\"**Fgo7$$\"3yELL$=2Vs\"Fgo$\"3ga\"ptzPC&)*Fgo7$$\"3Khmmm7+#\\# Fgo$\"3moG#pfnUp*Fgo7$$\"3)e*****\\`pfKFgo$\"3w13*Hi&e#[*Fgo7$$\"36HLL Lm&z\"\\Fgo$\"3M8O2jm%4'))Fgo7$$\"3>(******z-6j'Fgo$\"3REZUt1LE!)Fgo7$ $\"3q\"******4#32$)Fgo$\"3+E(f^&R$>3(Fgo7$$\"3q#****\\zS!pk&3hFgo7$$\"3K****\\FJ*G3 \"F1$\"3mcEp=4mjbFgo7$$\"3G******H%=H<\"F1$\"3_h#3'p:YE]Fgo7$$\"3qKLLo ,\"QD\"F1$\"3!p0(e4racXFgo7$$\"35mmm1>qM8F1$\"3AsC^rSi.TFgo7$$\"3%)*** ****HSu]\"F1$\"3?X`erXS5KFgo7$$\"3'HLL$ep'Rm\"F1$\"3N?+^wyv/DFgo7$$\"3 ')******R>4N=F1$\"3m08*z'eqc=Fgo7$$\"3#emm;@2h*>F1$\"3M$e0QD?RO\"Fgo7$ $\"3]*****\\c9W;#F1$\"3:stU!\\*>5'*FN7$$\"3Lmmmmd'*GBF1$\"3%H+cz(e6SmF N7$$\"3j*****\\iN7]#F1$\"3I[Uim&Q,Q%FN7$$\"3aLLLt>:nEF1$\"39)HBhKbG&GF N7$$\"35LLL.a#o$GF1$\"3u)[-kl1&)y\"FN7$$\"3ammm^Q40IF1$\"3UKogR#QS4\"F N7$$\"3y******z]rfJF1$\"3%pfp))3[Fz'F97$$\"3gmmmc%GpL$F1$\"3-IO#>uV)>Q F97$$\"3/LLL8-V&\\$F1$\"3rC?*>\\OFA#F97$$\"3=+++XhUkOF1$\"3$pw)G!p(y87 F97$$\"3=+++:oZ]Gi'F-7$$\"\"%F*F+-%'COLOURG6&%$RGBG$\"#5 !\"\"$F*F*Fa`l-%+AXESLABELSG6$Q\"x6\"Q!6\"-%%VIEWG6$;F(Fh_l%(DEFAULTG " 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 "" }}}{SECT 0 {PARA 4 "" 0 " " {TEXT -1 18 "Nombres au hasard\n" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "_seed := 21;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&_s eedG\"#@" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "rand();" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#\"-*y]I\"e(*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "x := [seq(evalf(rand()*10^(-12)),i=1..30)];" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#>%\"xG7@$\"+'3aM6'!#5$\"+I4?=sF($\"+I* Q@o#!#6$\"+zxQ*p\"F($\"+\\3w2SF-$\"+c(\\%pRF($\"+S3A8hF($\"+Y%4W#oF($ \"+&4vt_)F($\"+Jtx,JF($\"+I\"p[K&F($\"+[p?.7F($\"+dmkTQF($\"+!zL&*4&F( $\"+Y!z2t&F-$\"+_+pO;F($\"+>r$e@'F($\"+NoN\"R(F($\"+qmxAbF($\"+(**>I8$ F($\"+$3X`/*F($\"+!4#*=`)F($\"+A\"*)*)p&F($\"+jwbV&*F($\"+g>'>F#F($\"+ " 0 "" {MPLTEXT 1 0 24 "with(plots);listplot(x);" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoords has been redefined\n" } }{PARA 12 "" 1 "" {XPPMATH 20 "6#7U%(animateG%*animate3dG%-animatecurv eG%-changecoordsG%,complexplotG%.complexplot3dG%*conformalG%,contourpl otG%.contourplot3dG%*coordplotG%,coordplot3dG%-cylinderplotG%,densityp lotG%(displayG%*display3dG%*fieldplotG%,fieldplot3dG%)gradplotG%+gradp lot3dG%-implicitplotG%/implicitplot3dG%(inequalG%-listcontplotG%/listc ontplot3dG%0listdensityplotG%)listplotG%+listplot3dG%+loglogplotG%(log plotG%+matrixplotG%(odeplotG%'paretoG%*pointplotG%,pointplot3dG%*polar plotG%,polygonplotG%.polygonplot3dG%4polyhedra_supportedG%.polyhedrapl otG%'replotG%*rootlocusG%,semilogplotG%+setoptionsG%-setoptions3dG%+sp acecurveG%1sparsematrixplotG%+sphereplotG%)surfdataG%)textplotG%+textp lot3dG%)tubeplotG" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6#-%'CURVESG6#7@7$$\"\"\"\"\"!$\"+'3aM6'!#57$$\"\"#F*$\"+I4?=sF-7$$ \"\"$F*$\"+I*Q@o#!#67$$\"\"%F*$\"+zxQ*p\"F-7$$\"\"&F*$\"+\\3w2SF87$$\" \"'F*$\"+c(\\%pRF-7$$\"\"(F*$\"+S3A8hF-7$$\"\")F*$\"+Y%4W#oF-7$$\"\"*F *$\"+&4vt_)F-7$$\"#5F*$\"+Jtx,JF-7$$\"#6F*$\"+I\"p[K&F-7$$\"#7F*$\"+[p ?.7F-7$$\"#8F*$\"+dmkTQF-7$$\"#9F*$\"+!zL&*4&F-7$$\"#:F*$\"+Y!z2t&F87$ $\"#;F*$\"+_+pO;F-7$$\"#r$e@'F-7$$\"#=F*$\"+NoN\"R(F-7$$\"#>F* $\"+qmxAbF-7$$\"#?F*$\"+(**>I8$F-7$$\"#@F*$\"+$3X`/*F-7$$\"#AF*$\"+!4# *=`)F-7$$\"#BF*$\"+A\"*)*)p&F-7$$\"#CF*$\"+jwbV&*F-7$$\"#DF*$\"+g>'>F# F-7$$\"#EF*$\"+ \+ " 0 "" {MPLTEXT 1 0 150 "with(stats);with(describe);\n_seed := 1;\nx \+ := NULL;\nfor i from 1 to 100 do\n y := [seq(evalf(rand()*10^(-12)) ,j=1..100)]:\n x := x,mean(y):\nod:\nx;" }}{PARA 7 "" 1 "" {TEXT -1 116 "Warning, these names have been redefined: anova, describe, fit , importdata, random, statevalf, statplots, transform\n" }}{PARA 12 " " 1 "" {XPPMATH 20 "6#7*%&anovaG%)describeG%$fitG%+importdataG%'random G%*statevalfG%*statplotsG%*transformG" }}{PARA 7 "" 1 "" {TEXT -1 309 "Warning, these names have been redefined: coefficientofvariation, cou nt, countmissing, covariance, decile, geometricmean, harmonicmean, kur tosis, linearcorrelation, mean, meandeviation, median, mode, moment, p ercentile, quadraticmean, quantile, quartile, range, skewness, standar ddeviation, sumdata, variance\n" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#79% 7coefficientofvariationG%&countG%-countmissingG%+covarianceG%'decileG% .geometricmeanG%-harmonicmeanG%)kurtosisG%2linearcorrelationG%%meanG%. meandeviationG%'medianG%%modeG%'momentG%+percentileG%.quadraticmeanG%) quantileG%)quartileG%&rangeG%)skewnessG%2standarddeviationG%(sumdataG% )varianceG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&_seedG\"\"\"" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"xG6\"" }}{PARA 12 "" 1 "" {XPPMATH 20 "6`q$\"+5rK^[!#5$\"+W(4D4&F%$\"+&RWb0&F%$\"+C2jIYF%$\"+'ej q%\\F%$\"++^9U[F%$\"+?#z$\\`F%$\"+MsSD^F%$\"+=&fkw&F%$\"+,7J7^F%$\"+&Q A3+&F%$\"+xom<[F%$\"+*3\"=r]F%$\"+eFu>_F%$\"+miY/^F%$\"+RJc`\\F%$\"+=v @I`F%$\"+R_)4k&F%$\"+l'>Mv%F%$\"+!=^*=XF%$\"+dyV]`F%$\"+wvH0_F%$\"+ip& 3\"[F%$\"+sN?$R%F%$\"+RfTM]F%$\"+PKh$H&F%$\"+mp;!4&F%$\"+\\%fT?&F%$\"+ ^!H&f`F%$\"+I\"z7r%F%$\"+r0E8`F%$\"+WoC2bF%$\"+!)4o%f&F%$\"+&=aG3&F%$ \"+Tv\\bXF%$\"+(H*4#3&F%$\"+7!)4#*\\F%$\"+f\"y8$[F%$\"+!ppJ$[F%$\"+!p^ u([F%$\"+C_'p\"\\F%$\"+2-5#Q&F%$\"+9b(*4[F%$\"+pN&F%$\"+%[P*[^F%$\"+zA4X]F%$\"+\\.]m_F%$\"+mcx9ZF%$\"+%eBG-&F%$\"+ $fc>[%F%$\"+[Sh3aF%$\"+)[wXB&F%$\"+P-U&)\\F%$\"+1U1)G&F%$\"++Jgg[F%$\" +9C6w\\F%$\"+#GZs0&F%$\"+\"ob$fXF%$\"+!4yZu%F%$\"+#)3Y2\\F%$\"+'z!*p@& F%$\"+X5j<]F%$\"+r_uU[F%$\"+h7m(p%F%$\"+&4E0K&F%$\"+X=mnZF%$\"+2O\"Q^F%$\"+gu.]\\F%$\"+?lh&G&F %$\"+t3jAaF%$\"+X>Iu^F%$\"+4x6\"e&F%$\"+30W_aF%$\"+wKR0^F%$\"+&fqH9&F% $\"+^s,Q^F%$\"+Car&\\&F%$\"+td*=$[F%$\"+%=B\\F%$\"+k;W]^F%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "mx := min(x);Mx := max(x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#mxG$\"+'QW *QV!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#MxG$\"+=&fkw&!#5" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 159 "nbreClasses := 10;\netendue := 0.00001+Mx - mx;\nclasses := [seq(\n mx + i*etendue/nbreClass es..mx +(i+1)*etendue/nbreClasses\n , i = 0..nbreClasses-1)];" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%,nbreClassesG\"#5" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%(etendueG$\"+K^hF9!#5" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%(classesG7,;$\"+'QW*QV!#5$\"+**eq\"[%F);F*$\"+7uYCYF);F-$\"+E* Gsw%F);F0$\"+R/**4\\F);F3$\"+_>v_]F);F6$\"+lM^&>&F);F9$\"+y\\FQ`F);F<$ \"+#\\O5[&F);F?$\"+0!)zBcF);FB$\"+=&flw&F)" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 16 "with(transform);" }}{PARA 7 "" 1 "" {TEXT -1 224 "W arning, these names have been redefined: apply, classmark, cumulativef requency, deletemissing, divideby, frequency, moving, multiapply, scal eweight, split, standardscore, statsort, statvalue, subtractfrom, tall y, tallyinto\n" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#72%&applyG%*classmar kG%4cumulativefrequencyG%.deletemissingG%)dividebyG%*frequencyG%'movin gG%+multiapplyG%,scaleweightG%&splitG%.standardscoreG%)statsortG%*stat valueG%-subtractfromG%&tallyG%*tallyintoG" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 43 "ClassesPonderees := tallyinto([x],classes);" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#>%1ClassesPondereesG7,-%'WeightG6$;$\" +'QW*QV!#5$\"+**eq\"[%F,\"\"$-F'6$;$\"+7uYCYF,$\"+E*Gsw%F,\"\"'-F'6$;$ \"+y\\FQ`F,$\"+#\\O5[&F,\"\"*-F'6$;$\"+lM^&>&F,F;\"#;-F'6$;F5$\"+R/**4 \\F,\"#9-F'6$;F=$\"+0!)zBcF,\"\"%-F'6$;F-F3F7-F'6$;FO$\"+=&flw&F,\"\"# -F'6$;$\"+_>v_]F,FC\"#@-F'6$;FIFhn\"#>" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "with(statplots);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#7 .%(boxplotG%*histogramG%,scatterplotG%'xscaleG%'xshiftG%+xyexchangeG%+ xzexchangeG%'yscaleG%'yshiftG%+yzexchangeG%'zscaleG%'zshiftG" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "histogram(ClassesPonderees); " }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%)POLYGONSG 6,7&7$$\"+'QW*QV!#5\"\"!7$F($\"+,nS,@!\"(7$$\"+**eq\"[%F*F-7$F1F+7&7$$ \"+7uYCYF*F+7$F6$\"+sL\"G?%F/7$$\"+E*Gsw%F*F97$F&F*F+7$FL$\"+S-v?6! \"'7$FAFOF@7&F>7$F<$\"+.Yc1)*F/7$$\"+R/**4\\F*FU7$FXF+7&FI7$FG$\"+,c(= !GF/7$$\"+0!)zBcF*Fgn7$FjnF+7&F37$F1$\"+,M\"G?%F/7$F6F_oF57&F\\o7$Fjn$ \"++y$4S\"F/7$$\"+=&flw&F*Fdo7$FgoF+7&7$$\"+_>v_]F*F+7$F\\p$\"+!p%)4Z \"FQ7$FLF_pFK7&FZ7$FX$\"+54*3L\"FQ7$F\\pFdpF[p-%&COLORG6&%$RGBG$\"\"(! \"\"F[q$\"#5F]q-%%VIEWG6$;$\"+tG='>%F*$\"+J5K4fF*%(DEFAULTG" 1 2 0 1 10 0 2 6 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "" 0 "" {TEXT -1 60 "Cet histogramme se rapproche de la courbe de la loi normale." }}}}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 17 "S\351ries de Fourier" }}{PARA 0 "" 0 " " {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "plot(Heavi side(t),t=-3..3);" }}{PARA 13 "" 1 "" {GLPLOT2D 399 135 135 {PLOTDATA 2 "6%-%'CURVESG6$7hn7$$!\"$\"\"!$F*F*7$$!3!******\\2<#pG!#iUC\"F/F+7$$! 3-++DhkaI6F/F+7$$!3s******\\XF`**!#=F+7$$!3u*******>#z2))FgnF+7$$!3S++ ]7RKvuFgnF+7$$!3s,+++P'eH'FgnF+7$$!3q)***\\7*3=+&FgnF+7$$!3[)***\\PFcp PFgnF+7$$!3;)****\\7VQ[#FgnF+7$$!32)***\\i6:.8FgnF+7$$!39$***\\(oKQm'! #>F+7$$!3Wb+++v`hH!#?F+7$$\"3![W7y]bB<\"Fdp$\"\"\"F*7$$\"3/X\\i:&[iI&F dpFhp7$$\"3GXuVB:9S%*FdpFhp7$$\"3c%*\\7`MSd8F`pFhp7$$\"3g%\\(oa?=%=#F` pFhp7$$\"3l%**\\ilg4,$F`pFhp7$$\"3w%*\\Pfy^kYF`pFhp7$$\"3%[***\\i]2=jF `pFhp7$$\"3/&**\\(o%*=D'*F`pFhp7$$\"3]****\\(QIKH\"FgnFhp7$$\"3K****** \\4+p=FgnFhp7$$\"38****\\7:xWCFgnFhp7$$\"3E,++vuY)o$FgnFhp7$$\"3!z**** **4FL(\\FgnFhp7$$\"3A)****\\d6.B'FgnFhp7$$\"3s****\\(o3lW(FgnFhp7$$\"3 5*****\\A))oz)FgnFhp7$$\"3e******Hk-,5F/Fhp7$$\"36+++D-eI6F/Fhp7$$\"3u ***\\(=_(zC\"F/Fhp7$$\"3M+++b*=jP\"F/Fhp7$$\"3g***\\(3/3(\\\"F/Fhp7$$ \"33++vB4JB;F/Fhp7$$\"3u*****\\KCnu\"F/Fhp7$$\"3s***\\(=n#f(=F/Fhp7$$ \"3P+++!)RO+?F/Fhp7$$\"30++]_!>w7#F/Fhp7$$\"3O++v)Q?QD#F/Fhp7$$\"3G+++ 5jypBF/Fhp7$$\"3<++]Ujp-DF/Fhp7$$\"3++++gEd@EF/Fhp7$$\"39++v3'>$[FF/Fh p7$$\"37++D6EjpGF/Fhp7$$\"\"$F*Fhp-%'COLOURG6&%$RGBG$\"#5!\"\"F+F+-%+A XESLABELSG6$Q\"t6\"Q!6\"-%%VIEWG6$;F(F[w%(DEFAULTG" 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 8 "T := 10;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>% \"TG\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "f := t -> Heavi side(t-T/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGR6#%\"tG6\"6$%)o peratorG%&arrowGF(-%*HeavisideG6#,&9$\"\"\"*&#F1\"\"#F1%\"TGF1!\"\"F(F (F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "plot(f,0..T);" }} {PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVESG6$7hn7 $$\"\"!F)F(7$$\"3emmm;arz@!#=F(7$$\"3[LL$e9ui2%F-F(7$$\"3nmmm\"z_\"4iF -F(7$$\"39ommT&phN)F-F(7$$\"3KLLe*=)H\\5!#+&F:$\"\"\"F)7$$\"3nTg _ZP%)3]F:Fdp7$$\"3xGd?pNt:]F:Fdp7$$\"3(eT&)3RBE-&F:Fdp7$$\"3(4zWU..k.& F:Fdp7$$\"31mTgxE=]]F:Fdp7$$\"3C;HKk>ux]F:Fdp7$$\"3Vm;/^7I0^F:Fdp7$$\" 3!o;zW#)>/;&F:Fdp7$$\"3=nm\"zRQb@&F:Fdp7$$\"3nLLLe,]6`F:Fdp7$$\"3:++v= >Y2aF:Fdp7$$\"3Znm;zXu9cF:Fdp7$$\"34+++]y))GeF:Fdp7$$\"3H++]i_QQgF:Fdp 7$$\"3b++D\"y%3TiF:Fdp7$$\"3+++]P![hY'F:Fdp7$$\"3iKLL$Qx$omF:Fdp7$$\"3 Y+++v.I%)oF:Fdp7$$\"3?mm\"zpe*zqF:Fdp7$$\"3;,++D\\'QH(F:Fdp7$$\"3%HL$e 9S8&\\(F:Fdp7$$\"3s++D1#=bq(F:Fdp7$$\"3\"HLL$3s?6zF:Fdp7$$\"3a***\\7`W l7)F:Fdp7$$\"3enmmm*RRL)F:Fdp7$$\"3%zmmTvJga)F:Fdp7$$\"3]MLe9tOc()F:Fd p7$$\"31,++]Qk\\*)F:Fdp7$$\"3![LL3dg6<*F:Fdp7$$\"3%ymmmw(Gp$*F:Fdp7$$ \"3C++D\"oK0e*F:Fdp7$$\"35,+v=5s#y*F:Fdp7$$\"#5F)Fdp-%'COLOURG6&%$RGBG $Fhv!\"\"F(F(-%+AXESLABELSG6$Q!6\"Fbw-%%VIEWG6$;F(Fgv%(DEFAULTG" 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 54 "c := (f,n) -> 1/T*int(f(t)*e xp(-2*Pi*I*n*t/T),t=0..T);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"cGR6 $%\"fG%\"nG6\"6$%)operatorG%&arrowGF)*&-%$intG6$*&-9$6#%\"tG\"\"\"-%$e xpG6#*&**^#!\"#F6%#PiGF69%F6F5F6F6%\"TG!\"\"F6/F5;\"\"!F@F6F@FAF)F)F) " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "c(f,3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&^##\"\"\"\"\"$F&%#PiG!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 125 "S := (f,p,t) -> sum(evalf(c(f,-n)*exp(2*Pi*I *(-n)*t/T)),n=1..p)\n+ evalf(c(f,0))\n+sum(evalf(c(f,n)*exp(2*Pi*I*n*t /T)),n=1..p);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%\"SGR6%%\"fG%\"pG% \"tG6\"6$%)operatorG%&arrowGF*,(-%$sumG6$-%&evalfG6#*&-%\"cG6$9$,$%\"n G!\"\"\"\"\"-%$expG6#*&**^#!\"#F=%#PiGF=F;F=9&F=F=%\"TGF " 0 "" {MPLTEXT 1 0 0 "" }} {PARA 12 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "plot(simplify(S(f,4,t)),t=0..T,color=black);" }}{PARA 13 "" 1 " " {GLPLOT2D 399 221 221 {PLOTDATA 2 "6&-%'CURVESG6#7jr7$$\"\"!F)$\"+3+ ++]!#57$$\"+3x&)*3\"F,$\"+WV^JTF,7$$\"+;arz@F,$\"+g_F$G$F,7$$\"+!y%*z7 $F,$\"+$3*)od#F,7$$\"+XTFwSF,$\"+8W^7>F,7$$\"+oMrU^F,$\"+t*3)G7F,7$$\" +\"z_\"4iF,$\"*&>UYiF,7$$\"+m6m#G(F,$\"*r'[p5F,7$$\"+S&phN)F,$!*6D08$F ,7$$\"+:ddC%*F,$!*FDnI'F,7$$\"+*=)H\\5!\"*$!*IzJ[)F,7$$\"+ac#))4\"Fgn$ !*'f&=;*F,7$$\"+=JN[6Fgn$!*\"Fgn$!*%4\\A**F,7$$\" +[!3uC\"Fgn$!+g[3-5F,7$$\"+p3p)H\"Fgn$!*)feQ**F,7$$\"+!pt*\\8Fgn$!*$z] \"o*F,7$$\"+5lD,9Fgn$!*owME*F,7$$\"+J$RDX\"Fgn$!*vX%*p)F,7$$\"+kGhe:Fg n$!*;*yQrF,7$$\"+)R'ok;Fgn$!*/_C<&F,7$$\"+1J:w=Fgn$!)kW-nF,7$$\"+3En$4 #Fgn$\"*#HN'p$F,7$$\"+c#o%*=#Fgn$\"*z4RB&F,7$$\"+/RE&G#Fgn$\"*U(\\AkF, 7$$\"+4b=RBFgn$\"*`#)e\"pF,7$$\"+9r5$R#Fgn$\"*<9HF(F,7$$\"+>(GqW#Fgn$ \"*(\\C)[(F,7$$\"+D.&4]#Fgn$\"*2f'evF,7$$\"+PL4bDFgn$\"*&f\\#[(F,7$$\" +]jB4EFgn$\"*b6.E(F,7$$\"+j$zLm#Fgn$\"*t^a*oF,7$$\"+vB_Y2aFgn$\"+D\"pj3)F,7$$\"+[K56bFgn$\"+L\"p>v)F,7$$\"+yXu 9cFgn$\"+)feFM*F,7$$\"+8i\"=s&Fgn$\"+WIlk)*F,7$$\"+\\y))GeFgn$\"+Ey'*G 5Fgn7$$\"+bljLfFgn$\"+(3E31\"Fgn7$$\"+i_QQgFgn$\"+#GfI3\"Fgn7$$\"+T,1* 3'Fgn$\"+G>W!4\"Fgn7$$\"+@]tRhFgn$\"+'Q-d4\"Fgn7$$\"+gC2lhFgn$\"+`/c(4 \"Fgn7$$\"++*4/>'Fgn$\"++$=*)4\"Fgn7$$\"+?'yI?'Fgn$\"+!Q8%*4\"Fgn7$$\" +Stu:iFgn$\"+,!)y*4\"Fgn7$$\"++<3AiFgn$\"+b1$**4\"Fgn7$$\"+ggTGiFgn$\" +:Q/+6Fgn7$$\"+?/vMiFgn$\"+*pF,5\"Fgn7$%%FAILGF`cl7$$\"+2!=\"[iFgn$\"+ <'4-5\"Fgn7$$\"+M7:biFgn$\"+m9?+6Fgn7$$\"+hW=iiFgn$\"+\"Qe,5\"Fgn7$$\" +(o<#piFgn$\"+x13+6Fgn7$$\"+TTG$G'Fgn$\"+3F#)*4\"Fgn7$$\"+%f]tH'Fgn$\" +%=I%*4\"Fgn7$$\"+,N[DjFgn$\"+NBD)4\"Fgn7$$\"+3kh`jFgn$\"+X&pl4\"Fgn7$ $\"+AA))4kFgn$\"+&)Ry\"4\"Fgn7$$\"+O![hY'Fgn$\"+YDF&3\"Fgn7$$\"+4FEnlF gn$\"+i`\"*p5Fgn7$$\"+#Qx$omFgn$\"+Mk)40\"Fgn7$$\"+y)Qjx'Fgn$\"+J/QG5F gn7$$\"+u.I%)oFgn$\"+/8%\\+\"Fgn7$$\"+(pe*zqFgn$\"+'H:[l*F,7$$\"+5=\"p =(Fgn$\"+o%)G![*F,7$$\"+C\\'QH(Fgn$\"+RV**[$*F,7$$\"+'>#=WtFgn$\"+<._/ $*F,7$$\"+o%*\\%R(Fgn$\"+xC(>F*F,7$$\"+Sn\"[W(Fgn$\"+T_x^#*F,7$$\"+8S8 &\\(Fgn$\"+68>W#*F,7$$\"+g+tZvFgn$\"+j=&)\\#*F,7$$\"+3hK+wFgn$\"+p*>$p #*F,7$$\"+c@#Hl(Fgn$\"+X!>BI*F,7$$\"+0#=bq(Fgn$\"+u!z$[$*F,7$$\"+1FO3y Fgn$\"+&p1NZ*F,7$$\"+2s?6zFgn$\"+([,!R'*F,7$$\"+IXaE\")Fgn$\"+bkG25Fgn 7$$\"+l*RRL)Fgn$\"+\"=]90\"Fgn7$$\"+ee)*R%)Fgn$\"+`6:r5Fgn7$$\"+`<.Y&) Fgn$\"+5z\"o3\"Fgn7$$\"+Uch)f)Fgn$\"+dCi#4\"Fgn7$$\"+K&*>^')Fgn$\"+LC* o4\"Fgn7$$\"+AMy.()Fgn$\"+^nY*4\"Fgn7$$\"+8tOc()Fgn$\"+Gk>+6Fgn7$$\"+Y ko/))Fgn$\"+?V7*4\"Fgn7$$\"+!e0I&))Fgn$\"+MlG'4\"Fgn7$$\"+9ZK,*)Fgn$\" +R5g\"4\"Fgn7$$\"+\\Qk\\*)Fgn$\"+k#)*\\3\"Fgn7$$\"+3ASg!*Fgn$\"+e\"[B1 \"Fgn7$$\"+p0;r\"*Fgn$\"+k3&*G5Fgn7$$\"+mTAq#*Fgn$\"+Puk**)*F,7$$\"+lx Gp$*Fgn$\"+\"o&\\E%*F,7$$\"+A-\"\\Z*Fgn$\"+>vHO))F,7$$\"+!oK0e*Fgn$\"+ Z#Rp;)F,7$$\"+[oi\"o*Fgn$\"+bOVjuF,7$$\"+<5s#y*Fgn$\"+k*R9r'F,7$$\"+30 O\"*)*Fgn$\"+9xuleF,7$$\"#5F)$\"+1+++]F,-%+AXESLABELSG6$Q\"t6\"Q!6\"-% 'COLOURG6&%$RGBGF)F)F)-%%VIEWG6$;F(Fbbm%(DEFAULTG" 1 2 0 1 10 0 2 6 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}}}}{MARK "3 8 0 0" 35 }{VIEWOPTS 1 1 0 2 1 1805 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }