{VERSION 2 3 "DEC ALPHA UNIX" "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 Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 0 1 1 2 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 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 0" -1 256 1 {CSTYLE "" -1 -1 "New century schoolbook" 1 24 0 0 0 0 1 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 1 14 0 0 0 0 2 2 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 11 "ATTENTION! " }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 72 "VOUS DEVEZ FABRIQUER UN FICHIER expr_stru ct.mpl CONTENANT LE CODE MAPLE," }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 27 "QUE NOUS VOUS AVONS FOURNI." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 113 "ENSUITE VOUS DEVEZ REMPLACER PATH DANS L'INSTRUCTION SUIVANTE P AR UN CHEMIN CORRECT POUR ATTEINDRE CE FICHIER." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "read `PATH/expr_struct.mpl`;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "expr[1]:=int(x^3*ln(x),x);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"\"\",&*&%\"xG\"\"%-%#lnG6 #F*F'#F'F+*$F*F+#!\"\"\"#;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "expr[2]:=diff(x^3*ln(x),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&% %exprG6#\"\"#,&*&%\"xGF'-%#lnG6#F*\"\"\"\"\"$*$F*F'F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "expr[3]:=array(1..3,1..2,[[1,2],[x, y],[u,v]]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"\"$-%'MATR IXG6#7%7$\"\"\"\"\"#7$%\"xG%\"yG7$%\"uG%\"vG" }}}{EXCHG {PARA 0 "" 0 " " {TEXT -1 49 "draw_expr dessine l'arbre associe a l'expression." }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "expr[4]:=expr[1]=expr[2];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"\"%/,&*&%\"xGF'-%#lnG6#F+\"\"\" #F/F'*$F+F'#!\"\"\"#;,&*&F+\"\"#F,F/\"\"$*$F+F7F/" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 35 "draw_expr(expr[4],title=`expr[4]`);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "expr[5]:=(342/523)^(35/23); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"\"&,$*&\"$U$#\"#7\"#B \"$B&#\"#6F-#F*\"'HNF" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 39 "draw_exp r supporte les options de plot." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 68 " draw_expr(expr[5],color=red,thickness=2,axes=frame,title=`expr[5]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 73 "expr[6]:=plot([[0,0],[1,0],[1,1],[1,2],[0,2]],co lor=red,title=`expr[6]`);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG 6#\"\"'-%/INTERFACE_PLOTG6%-%'CURVESG6#7'7$\"\"!F07$$\"\"\"F0F07$F2F27 $F2$\"\"#F07$F0F6-%&TITLEG6#%(expr[6]G-%'COLOURG6&%$RGBG$\"*++++\"!\") F0F0" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 767 "Il en supporte quelques \+ autres.\nOn peut specifier la fonte utilisee pour le texte par font=[f amily,style,size] comme pour l'option de plot. Par defaut la fonte uti lisee est [HELVETICA,BOLD,15]. \nOn peut distinguer la couleur du tex te defini par fontcolor=... et la couleur des aretes definie par linec olor=... . La valeur donnee a fontcolor peut etre toute couleur suppor tee par plots[textplot] et celle passee a linecolor est quelconque; el le peut meme etre donne avec RGB.\nOn peut imposer le rapport entre ec helle verticale et echelle horizontale avec scale=[hs,vs] ou hs et vs \+ sont deux numeric. Ceci n'est utile qu'en conjonction avec scaling=con strained.\nOn peut imposer les coordonnees de la racine de l'arbre ave c l'option origin=[x,y] ou x et y sont numeric." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 64 "draw_expr(expr[6],fontcolor=blue,linecolor=red,title= `expr[6]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "width(expr[6 ]),height(expr[6]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"#$)\"\"&" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 121 "draw_expr(expr[6],fontcolor =blue,linecolor=red,scale=[1,5],scaling=constrained,font=[HELVETICA,BO LD,12],title=`expr[6]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "expr[7]:=series(tan(x),x,10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%% exprG6#\"\"(+/%\"xG\"\"\"\"\"\"#F*\"\"$\"\"$#\"\"#\"#:\"\"&#\"#<\"$:$ \"\"(#\"#i\"%NG\"\"*-%\"OG6#F*\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "width(expr[7]),height(expr[7]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"#c\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 91 "draw_expr(expr[7],font=[COURIER,BOLD,12],scale=[5,50],scaling=constra ined,title=`expr[7]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 59 "e xpr[8]:=evalf([seq([cos(k*Pi/5),sin(k*Pi/5)],k=0..10)],3);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"\")7-7$$\"\"\"\"\"!F,7$$\"$5)! \"$$\"$&eF07$$\"$5$F0$\"$[*F07$$!$5$F0F67$$!$5)F0F17$$!\"\"F,F,7$F<$!$ &eF07$F9$!$[*F07$F4FE7$F.FBF)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "width(expr[8]),height(expr[8]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"$k\"\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 68 "draw_expr (expr[8],scale=[1,30],scaling=constrained,title=`expr[8]`);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "expr[9]:=diff(f(x),x$15);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"\"*-%%diffG6$-F)6$-F)6$- F)6$-F)6$-F)6$-F)6$-F)6$-F)6$-F)6$-F)6$-F)6$-F)6$-F)6$-F)6$-%\"fG6#%\" xGFJFJFJFJFJFJFJFJFJFJFJFJFJFJFJ" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "draw_expr(expr[9],title=`expr[9]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "expr[10]:=logic[randbool](\{A,B,C\});" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"#5-%$&orG6&-%%&andG6%%\"A G%\"BG-%%¬G6#%\"CG-F,6%F/F0-F16#F.-F,6%-F16#F/F0F6-F,6%F/F3F6" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "draw_expr(expr[10],title=`ex pr[10]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "expr[11]:=x*y* (x^2-y^2)/(x^2+y^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"# 6**%\"xG\"\"\"%\"yGF*,&*$F)\"\"#F**$F+F.!\"\"F*,&F-F*F/F*F0" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "draw_expr(expr[11],title=`ex pr[11]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "expr[12]:=add( x[i],i=0..5);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"#7,.&%\" xG6#\"\"!\"\"\"&F*6#F-F-&F*6#\"\"#F-&F*6#\"\"$F-&F*6#\"\"%F-&F*6#\"\"& F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "draw_expr(expr[12],ti tle=`expr[12]`,font=[20]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "expr[13]:= convert(series(tan(x),x,10),confrac);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%%exprG6#\"#8*&%\"xG\"\"\",&F*F**&F)\"\"#,&!\"$F** &F)F-,&\"\"&F**&F)F-,&!\"(F**$F)F-#F*\"\"*!\"\"F*F9F*F9F*F9" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "draw_expr(expr[13],title=`ex pr[13]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "pict[1]:=draw_expr(expr[1],origin=[ 100,100]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 118 "pict[2]:=dra w_expr(expr[1],origin=[-100,100],scale=[8,20],scaling=constrained,line color=blue,fontcolor=red,font=[20]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 115 "pict[3]:=draw_expr(expr[4],origin=[-20,0],linecolor= blue,fontcolor=red,font=[15],scale=[5,50],scaling=constrained):" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "plots[display](\{seq(pict[i] ,i=1..3)\},title=`expr[1,1,4]`);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "38 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }