Automatic discontinuity handling

Eksempel 2 steg, kjørt i rekkefølge i én økt. Hvert steg ble kjørt mot motoren, og utdataene nedenfor er det de ga.

Steg 1

sol = NDSolve[{y'[t] == 15 / 4 - Floor[y[t]] + DiracDelta[t - 2], y[0] == .1}, y, {t, 0, 6}];

Ingen utdata - dette steget setter opp noe for det neste.

Steg 2

Plot[Evaluate[{y[t], y'[t]} /. sol], {t, 0, 6}, PlotLegends -> {"y(t)", "y'(t)"}]

Utdata

-Graphics-

Funksjoner brukt