Initial condition
> alpha2:=BesselJZeros(0,2);
> v:=(r,t)->BesselJ(0,alpha2*r)*cos(alpha2*t);
>
Plot of Initial condition
Animation of Membrane