Re: Solving equations involving Ln function

*To*: mathgroup at smc.vnet.net*Subject*: [mg19905] Re: Solving equations involving Ln function*From*: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>*Date*: Tue, 21 Sep 1999 02:22:43 -0400*Organization*: Universitaet Leipzig*References*: <7s1pb3$9n9@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Hi, Mathematica need a bit help: eqn = Log[x] + delta*v == Log[(1 - delta)*x/(1 - delta^2)] + delta*Log[(1 - delta)*delta*x/(1 - delta^2)] + delta^2*v eqn1 = eqn /. a_ == b_ :> a - b == 0 //. a_.Log[b_] + c_.Log[d_] :> Log[b^a*d^c] /. a_ + Log[b_] == 0 :> Exp[a] == -b and you get: Solve[eqn1, x] Hope that helps Jens Satyajit Bose wrote: > > Hello, > > I am trying to solve some equations involving the natural log function. SNIP SNAPP Here is > my input line and results in the kernel: > > In[1]:= > Solve[Log[x]+delta*v==Log[(1-delta)*x/(1-delta^2)]+delta*Log[(1-delta)*d > > elta*x/(1-delta^2)]+delta^2*v,x] > > Solve::tdep: The equations appear to involve transcendental functions of > the > variables in an essentially non-algebraic way. SNIP SNAPP > I am hoping to get a solution that looks like this: > > x -> exp[v*(1-delta)]*(1+delta)^(1+1/delta)/delta) > > Thank you for all your help. > > Sayajit Bose