Das Beispiel stammt nicht ausschliesslich von mir. Es wurde zusammengesetzt aus einem Vektorfeld und einer for-Schleife, wie sie ueblich fuer Maple ist. Diese for-Schleife habe ich nicht selbst erdacht, besonders nicht so, um eine Animation und Sequenz einer bewegten Graphik in Maple darzustellen. Das ist an der Stelle aber der uebliche Weg. Es gibt naemlich diesen Weg und noch einen anderen, eine Graphik in Maple beweglich zu machen. Dieses Vektorfeld selber stammt auch nicht von mir, ist aber ein uebliches Vektorfeld. Die Beispiele aus den vorherigen beiden Beispielsammlung schoen und schoen2 stammen ausschliesslich von mir (bis auf der Kreis, das ist aber ueblich). animation-vektorfeld.mw

with(plots); 1 

[animate, animate3d, animatecurve, arrow, changecoords, complexplot, complexplot3d, conformal, conformal3d, contourplot, contourplot3d, coordplot, coordplot3d, densityplot, display, fieldplot, fieldpl...
[animate, animate3d, animatecurve, arrow, changecoords, complexplot, complexplot3d, conformal, conformal3d, contourplot, contourplot3d, coordplot, coordplot3d, densityplot, display, fieldplot, fieldpl...
[animate, animate3d, animatecurve, arrow, changecoords, complexplot, complexplot3d, conformal, conformal3d, contourplot, contourplot3d, coordplot, coordplot3d, densityplot, display, fieldplot, fieldpl...
[animate, animate3d, animatecurve, arrow, changecoords, complexplot, complexplot3d, conformal, conformal3d, contourplot, contourplot3d, coordplot, coordplot3d, densityplot, display, fieldplot, fieldpl...
[animate, animate3d, animatecurve, arrow, changecoords, complexplot, complexplot3d, conformal, conformal3d, contourplot, contourplot3d, coordplot, coordplot3d, densityplot, display, fieldplot, fieldpl...
[animate, animate3d, animatecurve, arrow, changecoords, complexplot, complexplot3d, conformal, conformal3d, contourplot, contourplot3d, coordplot, coordplot3d, densityplot, display, fieldplot, fieldpl...
[animate, animate3d, animatecurve, arrow, changecoords, complexplot, complexplot3d, conformal, conformal3d, contourplot, contourplot3d, coordplot, coordplot3d, densityplot, display, fieldplot, fieldpl...
(1)
 

fieldplot([Re(sin(`+`(x, `*`(I, `*`(y))))), Im(sin(`+`(x, `*`(I, `*`(y)))))], x = 0 .. `+`(`*`(2, `*`(Pi))), y = -.5 .. .5, axes = boxed, arrows = SLIM); 1 

Plot_2d
 

`:=`(data, []); -1; for i to 100 do `:=`(phi, `*`(`*`(`+`(`*`(2, `*`(Pi))), `/`(1, 10)), `*`(i))); `:=`(data, [op(data), fieldplot([Re(sin(`+`(x, `*`(I, `*`(y)), phi))), Im(sin(`+`(x, `*`(I, `*`(y)), ...
`:=`(data, []); -1; for i to 100 do `:=`(phi, `*`(`*`(`+`(`*`(2, `*`(Pi))), `/`(1, 10)), `*`(i))); `:=`(data, [op(data), fieldplot([Re(sin(`+`(x, `*`(I, `*`(y)), phi))), Im(sin(`+`(x, `*`(I, `*`(y)), ...
 

Plot_2d