求解区域中带有复值边界条件的偏微分方程
求解带有复值边界条件的拉普拉斯方程.
In[1]:=
![Click for copyable input](assets.zh/solve-pdes-with-complex-valued-boundary-conditions/In_48.png)
ifun = NDSolveValue[{-\!\(
\*SubsuperscriptBox[\(\[Del]\), \({x, y}\), \(2\)]\(u[x, y]\)\) ==
1 + NeumannValue[I, x < 0],
DirichletCondition[u[x, y] == 0, x > -0]},
u, {x, y} \[Element] Disk[]]
Out[1]=
![](assets.zh/solve-pdes-with-complex-valued-boundary-conditions/O_28.png)
可视化求解结果.
In[2]:=
![Click for copyable input](assets.zh/solve-pdes-with-complex-valued-boundary-conditions/In_49.png)
Plot3D[{Re[ifun[x, y]], Im[ifun[x, y]]}, {x, y} \[Element] Disk[],
PlotTheme -> "Detailed"]
Out[2]=
![](assets.zh/solve-pdes-with-complex-valued-boundary-conditions/O_29.png)