Ok, I give up :) I am trying to verify the eigenvalues for heat PDE in 1D, when left end has homogeneous DirichletCondition
but the right end is insulated, so it has homogeneous Neumann conditions. But all the attempts I made do not work. I can't figure the correct syntax or something else I am doing is wrong.
When both ends are DirichletCondition
it works and gives correct eigenvalues
ClearAll[y,x,L0];
op={-y''[x] ,DirichletCondition[y[x]==0,x==0],
DirichletCondition[y[x]==0,x==L0]};
DEigenvalues[op,y[x],{x,0,L0},5]
Which matches hand solution of $\lambda = \left( \frac{n \pi}{L}\right)^2$ for $n=1,2,\dots$
Now when the RHS of bar is insulated, the eigenvalues are $\lambda = \left( \frac{n \pi}{2 L}\right)^2$ for $n=1,3,4,\dots$. This is what I tried
ClearAll[y,x,L0];
op={-y''[x]==NeumannValue[0,x==L0] ,DirichletCondition[y[x]==0,x==L0]};
DEigenvalues[op,y[x],{x,0,L0},5]
And
ClearAll[y,x,L0];
op={-y''[x]+NeumannValue[0,x==L0] ,DirichletCondition[y[x]==0,x==L0]};
DEigenvalues[op,y[x],{x,0,L0},5]
And
ClearAll[y,x,L0];
op={-y''[x] ,DirichletCondition[y[x]==0,x==L0],y'[L0]==0};
DEigenvalues[op,y[x],{x,0,L0},5]
And few more tries. Nothing works. I get input echoed.
What is the correct syntax for mixing both DirichletCondition
and NeumannValue
in DEigenvalues
?
Mathematica 11.1.1