Advanced Search

elsa21k

5 Reputation

One Badge

10 years, 258 days
Contact elsa21k

MaplePrimes Activity


These are answers submitted by elsa21k

solvevvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv...

elsa21k 5
November 17 2014
0 0

solve_x.mw

``

> 

b*x*ln(x)-x*ln(a)+a = 0

b*x*ln(x)-x*ln(a)+a = 0

 (1)
> 

solve({b*x*ln(x)-x*ln(a)+a = 0}, {x})

{x = exp((LambertW(-a*exp(-ln(a)/b)/b)*b+ln(a))/b)}

 (2)
> 

``

``


Download solve_x.mw

the first, you change the epsilon parame...

elsa21k 5
November 17 2014
0 1

solve.mw

``

> 

``
> 

solve({N*exp(-(1/2)*eta*epsilon*(N*alpha*p*w+2*N*w*C[max]-alpha*p*z-2*Q1*alpha)/(N*w))*S1*upsilon*w-N*S1*upsilon*w+K1^2*alpha*eta*z*p+K1*alpha*eta*z*p*S1 = 0}, {p})

{p = N*w*(2*LambertW(-(1/2)*epsilon*(N*w-z)*S1*upsilon*exp(-(1/2)*epsilon*(N^2*S1*upsilon*w^2-N*S1*upsilon*w*z+2*eta*K1^2*z*N*w*C[max]+2*eta*K1*z*N*w*C[max]*S1-2*K1^2*eta*alpha*z*Q1-2*K1*eta*alpha*z*Q1*S1)/(N*w*K1*z*(K1+S1)))/(K1*z*(K1+S1)))*K1^2*z+2*LambertW(-(1/2)*epsilon*(N*w-z)*S1*upsilon*exp(-(1/2)*epsilon*(N^2*S1*upsilon*w^2-N*S1*upsilon*w*z+2*eta*K1^2*z*N*w*C[max]+2*eta*K1*z*N*w*C[max]*S1-2*K1^2*eta*alpha*z*Q1-2*K1*eta*alpha*z*Q1*S1)/(N*w*K1*z*(K1+S1)))/(K1*z*(K1+S1)))*K1*z*S1+S1*upsilon*N*epsilon*w-epsilon*z*S1*upsilon)/(eta*alpha*K1*z*(K1+S1)*(N*w-z)*epsilon)}

 (1)
> 

``
> 

``
> 

``
> 

``
> 

``
> 

``
> 

``
> 

``
> 

``
> 

``
> 

``


Download solve.mw

Page 1 of 1