level 2
杨柳8086
楼主
Reduce[{\[Alpha]*((
A^2 b - 2 A b (-1 + cr) \[Eta] + \[Eta] ((1 + b (-2 + f))^2 +
b (-1 + cr)^2 \[Eta] - 4 b \[Beta]1^2 \[Theta]))/(
4 b \[Eta])) - ((
A^2*b + \[Eta] + \[Eta]*b^2*(-2 + f) + \[Eta]^2*
b*(-1 + cr)^2 + \[Beta]1^2*\[Theta]^2*b +
2 A*b*(\[Eta] - \[Eta]*cr + \[Beta]1*\[Theta]) +
2*\[Eta]*
b*(-2 + f + \[Beta]1*\[Theta] - \[Beta]1*\[Theta]*cr))/(
16 \[Eta]*b)) >=
0; (1 - \[Alpha])*((
A^2 b - 2 A b (-1 + cr) \[Eta] + \[Eta] ((1 + b (-2 + f))^2 +
b (-1 + cr)^2 \[Eta] - 4 b \[Beta]1^2 \[Theta]))/(
4 b \[Eta])) - ((
A^2*b + \[Eta] + \[Eta]*b^2*(-2 + f) + \[Eta]^2*b*(-1 + cr)^2 +
9 \[Beta]1^2*\[Theta]^2*b -
2 A*b*(\[Eta] - \[Eta]*cr + 3 \[Beta]1*\[Theta]) +
2*\[Eta]*
b*(-2 + f - 3 \[Beta]1*\[Theta] + 3 \[Beta]1*\[Theta]*cr))/(
16 \[Eta]*b)) >= 0 && cr < 1 && 0 <= b <= 1 &&
0 < \[Theta] <= 1 && 0 < \[Eta] < 1 &&
0 < \[Alpha] < 1}, {\[Alpha]}]

2024年01月20日 07点01分
1
A^2 b - 2 A b (-1 + cr) \[Eta] + \[Eta] ((1 + b (-2 + f))^2 +
b (-1 + cr)^2 \[Eta] - 4 b \[Beta]1^2 \[Theta]))/(
4 b \[Eta])) - ((
A^2*b + \[Eta] + \[Eta]*b^2*(-2 + f) + \[Eta]^2*
b*(-1 + cr)^2 + \[Beta]1^2*\[Theta]^2*b +
2 A*b*(\[Eta] - \[Eta]*cr + \[Beta]1*\[Theta]) +
2*\[Eta]*
b*(-2 + f + \[Beta]1*\[Theta] - \[Beta]1*\[Theta]*cr))/(
16 \[Eta]*b)) >=
0; (1 - \[Alpha])*((
A^2 b - 2 A b (-1 + cr) \[Eta] + \[Eta] ((1 + b (-2 + f))^2 +
b (-1 + cr)^2 \[Eta] - 4 b \[Beta]1^2 \[Theta]))/(
4 b \[Eta])) - ((
A^2*b + \[Eta] + \[Eta]*b^2*(-2 + f) + \[Eta]^2*b*(-1 + cr)^2 +
9 \[Beta]1^2*\[Theta]^2*b -
2 A*b*(\[Eta] - \[Eta]*cr + 3 \[Beta]1*\[Theta]) +
2*\[Eta]*
b*(-2 + f - 3 \[Beta]1*\[Theta] + 3 \[Beta]1*\[Theta]*cr))/(
16 \[Eta]*b)) >= 0 && cr < 1 && 0 <= b <= 1 &&
0 < \[Theta] <= 1 && 0 < \[Eta] < 1 &&
0 < \[Alpha] < 1}, {\[Alpha]}]
