Maple pdsolve supports periodic boundary conditions. So I was hoping it will be able to solve the heat PDE inside disk with periodic boundary conditions. But I am not able to make it work.
Is there a trick to make Maple solve this, is there something I need to add or adjust something else? or it is just the functionality is not currently implemented?
This is what I tried
pde := diff(u(r,theta,t),t)=diff(u(r,theta,t),r$2) + 1/r*diff(u(r,theta,t),r)+1/r^2*diff(u(r,theta,t),theta$2);
bc1 := u(a,theta,t)=0;
bc2 := eval(diff(u(r,theta,t),theta),theta=-Pi)=eval(diff(u(r,theta,t),theta),theta=Pi);
bc3 := u(r,-Pi,t)=u(r,Pi,t);
ic := u(r,theta,0)=f(r,theta);
sol := pdsolve([pde, bc1,bc2,bc3, ic], u(r, theta, t), HINT = boundedseries(r = 0)) assuming a>0,r>0
I solved this analytically by hand using standard separation of variables method. The issue of telling Maple the solution is bounded at center of disk, I assume is being handled automatically by the HINT=boundedseries(r = 0).
If I remove the hint, it also does not solve it.
Maple 2019, Physics package 338