Initial condition

> alpha4:=BesselJZeros(0,4);

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

>

Plot of Initial condition

Animation of Membrane