wolfram-mathematica - 在数学中使用 Dsolve

Question

我正在使用 dsolve 找到涉及磁共振的薛定谔方程的求解微分方程，但出现错误。

DSolve[{I*a'[t] == .5*(w0*a[t] + w1*Cos[w*t]*b[t]), 

 I*b'[t] == .5*(w1*Cos[w*t]*a[t] - w0*b[t]), 

a[t]^2 + b[t]^2 == 1}, {a, b}, t]

从此我得到了答复

There are fewer dependent variables than equations, so the system is \

过度确定。

我看到 3 个方程和 3 个未知数，所以我真的不知道它为什么这样做。任何帮助，将不胜感激。

Answer 1

也许这会有所帮助。

参考。振荡 B 场中的 NMR 跃迁速率

DSolve[
  b'[t] == ((I w1)/2) (Exp[I (w + w0) t] + Exp[-I (w - w0) t]) - I w0 b[t],
  b[t], t] // Simplify