# # Maple-Beispielscript (Maple 10) # # Thema: Animationen erstellen # # www.jb-electronics.de # # # Neu starten und Plot-Paket einbinden restart; with (plots); # Funktionen definieren x1 := (t, a) -> exp(-a * t) * sin (2 * Pi * t); x2 := (t, a) -> exp(-a * t); x3 := (t, a) -> -exp(-a * t); # Animation erstellen animate(plot, [[x1(t, a), x2(t, a), x3(t, a)], t=0..10], a=0..0.3, frames=25);