In[]:=
Solve[2a
4
Q
+5
4
r
(-4
2
Q
-2r(-3M+r)+3c
1-3ω
r
(1+ω))0,r]
Out[]=
Solve[2a
4
Q
+5
4
r
(-4
2
Q
-2r(-3M+r)+3c
1-3ω
r
(1+ω))0,r]
In[]:=
a=0;​​c=0;​​2a
4
Q
+5
4
r
(-4
2
Q
-2r(-3M+r)+3c
1-3ω
r
(1+ω))
Out[]=
5
4
r
(-4
2
Q
-2r(-3M+r))
In[]:=
Solve[(-4
2
Q
-2r(-3M+r))==0,r]
Out[]=
r
1
2
3M-
9
2
M
-8
2
Q
,r
1
2
3M+
9
2
M
-8
2
Q
