TeXgraph# {version 1.99} Cmd Window(-2.5+3.85*i, 7-1.5*i, 1+i); Margin(0, 0, 0, 0); Border(0); [OriginalCoord(1), IdMatrix()]; [theta:=0.5236, phi:=1.0472, IdMatrix3D(), ModelView(ortho)]; [GrayScale(0), ComptGraph:=0]; Var A = -1-i; B = 4-0.25*i; MouseVer = 0.2; C = Get(Mbezier1); C' = shift(Get(Mbezier1),B-A); Include "Mouse.mac"; Mac SelectName = Mbezier1; SelectBody = ["Contour(",controles,",",lineclosed,")"]; ctrldot = [-2.22222222222222+1.66666666666666*i,-2.14285714285714+2.43386243386243*i,-2.07009645534624+3.1372157464678*i, 1.11088863779182+3.22126099004333*i,1.48148148148148+2.61904761904762*i,1.9047619047619+1.93121693121693*i, 1.44198260400172+1.62281137853067*i,0.834261838440111+1.26132075471698*i,0.226541072878501+0.899830130903289*i, 0.595746562320379-0.429365079365081*i,-0.674094707520891-0.35*i,-1.37982445374686-0.305891890860876*i, -1.42833961615391+0.6635957097484*i,-1.0974930362117+1.28852813852814*i,-0.62130256002123+2.18799903799904*i]; laliste = [1,6+i,6*i,0,16777215*i,0,50+i,3*i,-5+5*i,150,1,0,1,i,1,2,3,4,5,6,7,8,9,10,11,12, 13,14,15,jump]; dotstate = [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1]; Init = [C1:=0, C2:=0, C3:=0, C4:=0, C5:=0, C6:=1, C7:=0, C8:=0, C9:=0, C10:=0, C11:=0, C12:=0, C13:=0, C14:=0, C15:=0, C16:=0, NbCtrlDot:=15, CtrlDot:=ctrldot(), LaListe:=laliste() , DotState:=dotstate(), ShowRef:=0, ShowLabel:=0, SLabelEnCours:=0, flechage:=fleches() , ReCalc() ]; Cmd [tMin:=-5,tMax:=10,DotScale:=1+i]; Graph etat = Nil; Cmd [Width:=6,MouseCode:=1,tMax:=5]; Graph Mbezier1 = Contour([1,2,3,4,5,6,7,8,9,10,11,12,13,14,15],1); Cmd [MouseCode:=-1]; Graph Controles = ShowCtrl(); Graph Selection = ShowSelect(); Cmd [Width:=4,tMax:=10]; Graph user_1 = [//command Width:=6, Line(C'), Arrows:=1, Seg(A,B),Seg(C[100],C'[100]), LineStyle:=dashed,Arrows:=0, Seg(A,C[100]),Seg(B,C'[100]), DotStyle:=times,DotSize:=5+5*i, LabelDot(A,"$A$","S",1,0.15), LabelDot(B,"$B$","S",0,0.2), LabelDot(C[100],"$M$","N",1,0.2), LabelDot(C'[100],"$M'$","N",0,0.2), LabelDot(C[200],"$\mathscr{F}$","O",0,0.2), LabelDot(C'[200],"$\mathscr{F}'$","O",0,0.2), ];