pendulum.vw3

defequ

axe1:="t";
axe2:="E(t)";
min1:=-maxt/10;max1:=maxt;
min2:=-0.05*c*x_*x_;max2:=1.1*c*x_*x_;
draw:=3;