Initial condition

> alpha1:=BesselJZeros(0,1);

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

>

Plot of Initial condition

Animation of Membrane