wolfram-mathematica - 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 つの未知数が表示されるので、なぜこれを行っているのかよくわかりません。どんな助けでも大歓迎です。