TeXgraph# {version 1.995} Cmd Window(-0.5+5.5*i, 25-5.5*i, 0.549019607843137+1.27272727272727*i); Margin(0.5, 0.5, 0.5, 0.5); Border(0); [OriginalCoord(1), IdMatrix()]; [theta:=0.5236, phi:=1.0472, IdMatrix3D(), ModelView(ortho)]; [GrayScale(0), ComptGraph:=0]; Cmd [tMin:=-5,tMax:=7.5,DotScale:=1+i]; Graph NaissOsc = [ XMin:=-0.5,XMax:=25,YMin:=-5.5,YMax:=5.5, view(XMin,XMax,YMin,YMax),Marges(0.5,0.5,0.5,0.5), size(15,0), U:=0.4,r:=1/5,w:=6*r, // grille Width :=2,Color :=lightgray, LineStyle :=dotted, Grille(0,(1+i)*0.5), Width :=4,Color :=gray, Grille(0,(1+i)*1), // axes Color :=black, Arrows :=1,axeX(0,0),axeY(0,0), //draw("axeY",[0,0]), ,[limits:=-5.5+i*5.5] LabelAxe(x,0.99*XMax,"$t$",[1]), LabelAxe(y,0.99*YMax*i,"$u_3(t)$",[2]), // courbes xc:=Solve(5 - U*exp(r*X)*cos(w*X+ pi/2),X, 0,XMax), Arrows :=0,Width :=12,LineStyle:=solid,NbPoints:=100,tMin:=0,tMax:=xc[1], Color :=red, Cartesienne(U*exp(r*x)*cos(w*x+ pi/2)), phiC:=Solve( U*exp(r*xc[1])*cos(w*xc[1]+ pi/2) -5*cos(w*xc[1] + T) ,T, -pi ,pi), NbPoints:=100,tMin:=xc[1],tMax:=XMax, Color :=blue, Cartesienne(5*cos(w*(x)+ pi/2 )), Cartesienne(5*cos(w*(x)+phiC[1] )), LineStyle:=dashed,Width:=8,tMin:=0,tMax:=XMax, Cartesienne(5), Cartesienne(-5), DotStyle:=cross,LabelDot(5*i,"$U$","O",1),LabelDot(-5*i,"$-U$","O",1), ];