Nontrivial homogeneous Laplace problem
- To: mathgroup at smc.vnet.net
- Subject: [mg42667] Nontrivial homogeneous Laplace problem
- From: CAP F <Ferdinand.Cap at eunet.at>
- Date: Sat, 19 Jul 2003 03:19:57 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
(* c39: Nontrivial homogeneous boundary value problem of the Laplace \
equation.For the calculation of the numerical values see equations
(4.8.6) to \
4.8.8), page 226 of the book Mathematical Methods in Physics and
Engineering \
with Mathematica, CRC Press, ISBN 1584884029 *)
Plot3D[-Log[Sqrt[(x^2+y^2)/20]]+Cos[Pi 1*x/8]Cosh[Pi 1*y/8]*(-0.546985)+
Cos[Pi 1*y/4]Cosh[Pi 1*x/4]*(-0.00977812)+
Cos[Pi 3*x/8]Cosh[Pi 3*y/8]*(-0.013602)+
Cos[Pi 3*y/4]Cosh[Pi 3*x/4]*(3.4562 10^-7)+
Cos[Pi 5*x/8]Cosh[Pi 5*y/8]*(-0.00023172)+
Cos[Pi 5*y/4]Cosh[Pi 5*x/4]*(-1.47646 10^-10)+
Cos[Pi 7*x/8]Cosh[Pi 7*y/8]*(-0.00001538)+
Cos[Pi 7*y/4]Cosh[Pi 7*x/4]*(1.01088 10^-13),{x,-4,4},{y,-2,2},
PlotPoints\[Rule]45]