Initial condition

> alpha3:=BesselJZeros(0,3);

> v:=(r,t)->BesselJ(0,alpha3*r)*cos(alpha3*t);

>

Plot of Initial condition

Animation of Membrane