level 1
DSolve [{\[Alpha]'[t] == -(\[CapitalTau]/2)*\[Alpha][t] -
I*\[CapitalDelta]*\[Alpha][t] -
I*(g^2/\[Delta] + ((2*g^2)/\[Delta])*k*Abs [\[Epsilon][t]]*
Abs [\[Epsilon][t]])*\[Alpha][t] -
I*(g^2/\[Delta] + ((2*g^2)/\[Delta])*k*Abs [\[Epsilon][t]]*
Abs [\[Epsilon][t]])*\[Beta][t], \[Beta]'[
t] == -(\[CapitalTau]/2)*\[Beta][t] -
I*\[CapitalDelta]*\[Beta][t] -
I*(g^2/\[Delta] + ((2*g^2)/\[Delta])*k*Abs [\[Epsilon][t]]*
Abs [\[Epsilon][t]])*\[Beta][t] -
I*(g^2/\[Delta] + ((2*g^2)/\[Delta])*k*Abs [\[Epsilon][t]]*
Abs [\[Epsilon][t]])*\[Alpha][t], \[Epsilon]'[
t] == -(\[CapitalTau]/2)*\[Epsilon][t] -
I*2*(Subscript[\[CapitalDelta],
m] - (g^2/\[Delta] + ((2*g^2)/\[Delta])*k*Abs [\[Epsilon][t]]*
Abs [\[Epsilon][t]]) +
k*Abs [\[Epsilon][t]]*Abs [\[Epsilon][t]])*\[Epsilon][t] -
I*(2 - (g^2/\[Delta] + ((2*g^2)/\[Delta])*k*Abs [\[Epsilon][t]]*
Abs [\[Epsilon][
t]])/\[CapitalDelta])*\[CapitalOmega], \[Alpha][0] ==
1, \[Beta][0] == 0, \[Epsilon][0] == 0}, {\[Alpha][t], \[Beta][
t], \[Epsilon][t]}, t]
2024年10月06日 02点10分
2
这是代码大佬们
2024年10月06日 02点10分