TeXgraph# {version 1.99} Cmd Window(-0.9+3*i, 7.9-2.5*i, 1.02272727272727+1.63636363636364*i); Margin(0.5, 0.5, 0.5, 0.5); Border(0); [OriginalCoord(1), IdMatrix()]; [theta:=0.2618, phi:=1.309, IdMatrix3D(), ModelView(ortho)]; [GrayScale(0), ComptGraph:=1]; Cmd [NbPoints:=1000,tMin:=-5,tMax:=5,DotScale:=1+i,LabelSize:=5]; Graph EffetPeau = [view(-0.9,7.9,-2.5,3),size(10,0), Width:=6, Arrows:=1, LabelSize:=normalsize, axeY(0,0), axeX(0,1), Xm:=2,w:=5*pi,t0:=1,t1:=2, t2:=2.49, LabelAxe(x,7.5,"$\frac{z}{\delta}$"), LabelAxe(y,2.5*i,"$\frac{E(z)}{E_{\text{vide}}}$"), Width:=10,Arrows:=0, tMin:=0, tMax:=7.5, Color:=blue, Cartesienne(Xm*exp(-x)*cos(w*t0-x)), Pb0:=4.5+2.7*i,Pb1:=5.2+2.7*i,Ligne([Pb0,Pb1],0), LabelDot(Pb1+0.3,"\`{a} $t=1$ s.","E",0), Color:=red, Cartesienne(Xm*exp(-x)*cos(w*t1-x)), Pr0:=4.5+2*i,Pr1:=5.2+2.0*i,Ligne([Pr0,Pr1],0), LabelDot(Pr1+0.3,"\`{a} $t=2$ s.","E",0), Color:=forestgreen, Cartesienne(Xm*exp(-x)*cos(w*t2-x)), Pv0:=4.5+1.3*i,Pv1:=5.2+1.3*i,Ligne([Pv0,Pv1],0), LabelDot(Pv1+0.3,"\`{a} $t=2,49$ s.","E",0), LineStyle:=dashed, Width:=8, Color:=black, Cartesienne(Xm*exp(-x)), Cartesienne(-Xm*exp(-x)), Pp:= 0.8+i*Xm*exp(-0.8), Pm:= 0.8-i*Xm*exp(-0.8), LineStyle:=solid, Arrows:=1,Ligne([Pp+1+i,Pp,jump,Pm +1-i,Pm],0), LabelDot(Pp+1+i,"$\exp(\frac{-z}{\delta})$","E",0), LabelDot(Pm +1-i,"$-\exp(\frac{-z}{\delta})$","E",0), ];