U wm "Membrane displacement harmonic"
U_av intop_be(U)/intop_be(1) "Average harmonic membrane deformation"
Uth uth/ta.iomega "Theoretical approximation of membrane displacement"
Uth_av intop_be(Uth)/intop_be(1) "Average theoretical membrane deformation"
uth ta.iomega*pin/(Tm0*kmsq)*(1-besselj(0,km*r)/besselj(0,km*Rmem)) "Theoretical approximation of membrane velocity"
uth_av intop_be(uth)/intop_be(1) "Average theoretical membrane velocity"
kmsq -ta.iomega^2*rhoms/Tm0 "Membrane wave number squared"
km sqrt(kmsq) "Membrane wave number"
um_av intop_be(wm*ta.iomega)/intop_be(1) "Average membrane velocity"