Initial condition

> alpha[2,3]:=BesselJZeros(2,3);

> u:=(r,theta,t)->BesselJ(2,alpha[2,3]*r)*cos(2*theta)*cos(alpha[2,3]*t);

>

Plot of Initial condition

Animation of Membrane