level 4
……你没看懂这帖:https://tieba.baidu.com/p/4126799131
eqn = Derivative[1, 0][u][t, y] == \[Nu]*Derivative[0, 2][u][t, y];
bc1 = u[0, y] == 0;
bc2 = u[t, 0] == Piecewise[{{U, t > 0}}, 0];
eqnlp = LaplaceTransform[{eqn, bc2}, t, s] /. Rule @@ bc1 /.
HoldPattern[LaplaceTransform[a_, t, s]] :> a
solla = FullSimplify[DSolve[eqnlp, u[t, y], y]][[1]]
mid = Collect[u[t, y] /. solla, E^(-((Sqrt[s] y)/Sqrt[\[Nu]]))]
InverseLaplaceTransform[mid /. C[1] -> 0, s, t]
我自以为那帖是的解说已经很详尽了,如果还是有疑问请具体说说哪里不懂。
2018年11月30日 18点11分
