Ugrás a tartalomhoz

Impulzív jelenségek modelljei

Karsai János

Typotex

Long Description

tnn=Prepend[Select[tn,Function[u,t0?u?t1]],t0]; phvolnonlin=PhaseVolImpBW[TrajNL[t],{t,tnn},{Thickness[0.015]}, BoxRatios›{2,1,1},Axes›True,PlotRange-///>///{{t0,t1},{x1,x2},{y1,y2}}]; phvollin=PhaseVolImpBW[TrajL[t],{t,tnn},{Thickness[0.015]}, BoxRatios›{2,1,1},Axes›True,PlotRange-///>///{{t0,t1},{x1,x2},{y1,y2}}]; Show[GraphicsArray[{Show[phvolnonlin,PlotLabel›"Nemlin. rsz."], Show[phvollin,PlotLabel›"Lin. rsz."]}]];