Animacija za Primjer 2.

Clear[u] ; u[x_, 0] := 0 ; u[x_, t_] := 1/8Sin[ 2 t] Sin[2 x] l = π ;

RowBox[{, RowBox[{Table, [, RowBox[{RowBox[{Show, [, RowBox[{Plot[u[x, t]//Evaluate, { ... ectRatio1}], ]}], , ,, , RowBox[{{, RowBox[{t, ,, 0, ,, 5, ,, 0.2}], }}]}], ]}]}]

Created by Mathematica  (December 3, 2003)