一个数值求解 2个函数2个自变量偏微分方程的例子
本帖最后由 dlpg070 于 2020-8-30 15:51 编辑一个数值求解 2个函数2个自变量偏微分方程的例子
希望对倪鹏举的问题有启发
Clear["Global`*"]
Print["2个函数2个自变量 NDVolve求解的简单例子"]
s=NDSolve[{D,x1]==D,x2,x2],y1==0,y1==Sin,y1==0,
D,x1]==D,x2,x2],y2==0,y2==(Sin)^2,y2==0},{y1,y2},(*{t,x}\\*){x1,0,10},{x2,0,5},MaxStepSize->0.05]
Print["显示y1:"]
Plot3D/.s],{x1,0,10},{x2,0,5}, PlotRange->All]
Print["显示y2:"]
Plot3D/.s],{x1,0,10},{x2,0,5}, PlotRange->All]
页:
[1]