需要解出τ的表达式,题目要求如上图,我使用的代码如下:
NDSolve[\[Tau] Dt[S[X, t]] +
Grad[-Grad[S[x y z], {x, y, z}], {x, y, z}] == 0,
Grad[S[0, t], {X, t}] == 0,
Grad[S[1, t], {X, t}] == \[Tau], \[Tau], {X, 0, 1}]
出现了 错误NDSolve::dsvar: , \[Tau] ({0,0}==0) cannot be used as a variable.
求大佬帮忙看看这个边界条件是输入错误了吗