In[]:=
$Version
Out[]=
12.0.0 for Microsoft Windows (64-bit) (April 6, 2019)
In[]:=
A1=DSolveChangeVariablesDSolveu''[x]-(v-2)*u[x]-v+*(-u[x]^3+u[x]^5)0,u,x,W,ξ,u[x]W[ξ]^(1/2),xct+
v1
μ
ξ
k
Out[]=
DSolveChangeVariablesDSolve-(-2+v)u[x]-v+(-+)+[x]0,u,x,W,ξ,u[x]
v1
μ
3
u[x]
5
u[x]
′′
u
W[ξ]
,xct+ξ
k
In[]:=
B1=Collect(A1[[1,1]])*
W[ξ]
//FullSimplify,W[ξ](*Solutionone:*)Out[]=
′′
u
v1
μ
2
u[x]
2
u[x]
W[ξ]
In[]:=
A2=DSolveChangeVariablesDSolveu''[x]-(v-2)*u[x]-v+*(-u[x]^3+u[x]^5)0,u,x,W,ξ,u[x]-W[ξ]^(1/2),xct+
v1
μ
ξ
k
Out[]=
DSolveChangeVariablesDSolve-(-2+v)u[x]-v+(-+)+[x]0,u,x,W,ξ,u[x]-
v1
μ
3
u[x]
5
u[x]
′′
u
W[ξ]
,xct+ξ
k
In[]:=
B2=Collect(A2[[1,1]])*
W[ξ]
//FullSimplify,W[ξ](*Solutiontwo:*)Out[]=
′′
u
v1
μ
2
u[x]
2
u[x]
W[ξ]