level 6
纯小树
楼主
如下形式的偏微分方程组:
u[x,t]与s[t]的耦合,由于是偏微分方程和常微分方程的耦合,求解会报错。
具体情况如下截图,后附截图对应的代码:

NDSolve[{
\!\(
\*SubscriptBox[\(\[PartialD]\), \(t\)]\(v[\[Xi], t]\)\) -
s'[t]/s[t] \[Xi] \!\(
\*SubscriptBox[\(\[PartialD]\), \(\[Xi]\)]\(v[\[Xi], t]\)\) -
1/s[t]^2 \!\(
\*SubscriptBox[\(\[PartialD]\), \(\[Xi], \[Xi]\)]\(v[\[Xi],
t]\)\) == \[Xi] s[t] E^t + 2,
s'[t] == -(1/s[t])
\!\(\*SuperscriptBox[\(v\),
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1"}], ")"}],
Derivative],
MultilineFunction->None]\)[1, t],
v[0, t] == 0,
v[1, t] == 0,
v[\[Xi], 0] == \[Xi] (1 - \[Xi]),
s[0] == 1
}, {s, v}, {\[Xi], 0, 1}, {t, 0, 0.1}]
2020年04月13日 13点04分
1
u[x,t]与s[t]的耦合,由于是偏微分方程和常微分方程的耦合,求解会报错。
具体情况如下截图,后附截图对应的代码:

NDSolve[{\!\(
\*SubscriptBox[\(\[PartialD]\), \(t\)]\(v[\[Xi], t]\)\) -
s'[t]/s[t] \[Xi] \!\(
\*SubscriptBox[\(\[PartialD]\), \(\[Xi]\)]\(v[\[Xi], t]\)\) -
1/s[t]^2 \!\(
\*SubscriptBox[\(\[PartialD]\), \(\[Xi], \[Xi]\)]\(v[\[Xi],
t]\)\) == \[Xi] s[t] E^t + 2,
s'[t] == -(1/s[t])
\!\(\*SuperscriptBox[\(v\),
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1"}], ")"}],
Derivative],
MultilineFunction->None]\)[1, t],
v[0, t] == 0,
v[1, t] == 0,
v[\[Xi], 0] == \[Xi] (1 - \[Xi]),
s[0] == 1
}, {s, v}, {\[Xi], 0, 1}, {t, 0, 0.1}]