Author 
Comment/Response 
George

07/28/12 7:13pm
I think I have something close to what I need, but in Maple :
PDE := n*(diff(h(theta, phi, t), t)) = (diff(K*(diff(h(theta, phi, t),
theta)), theta))/(r^2*sin(phi)^2)+(diff(K*sin(phi)*(diff(h(theta, phi,
t), phi)), phi))/(r^2*sin(phi)) ;
sol := pdsolve(PDE, h(theta, phi, t));
but still don't know how to write this down in Mathematica...
Any ideas ?
Thank you
URL: , 
