Re: If a*b=c/d, then a=c/bd, How do i do this in Mathematica?

• To: mathgroup at smc.vnet.net
• Subject: [mg79774] Re: If a*b=c/d, then a=c/bd, How do i do this in Mathematica?
• From: dimitris <dimmechan at yahoo.com>
• Date: Sat, 4 Aug 2007 05:51:11 -0400 (EDT)
• References: <f8uvi0\$bk9\$1@smc.vnet.net>

On 3    , 13:20, GR <gobithaa... at gmail.com> wrote:
> Dear Experts,
>
> I tried reading the help doc in M6, but unable to find the right
> command. Can M6 simplify it?
>
> Cheers,
> GR

First note that

In[15]:=
a*b=c/d

>From In[15]:=
\!\(\*
RowBox[{\(Set::"write"\), \(\(:\)\(\ \)\), "\<\"Tag \\!\\(Times\\)
in \\!\\(
a\\\\ b\\) is
Protected. \\!\\(\\*ButtonBox[\\\"More...\\\", \
ButtonData:>\\\"General::write\\\"]\\)\"\>"}]\)

Out[15]=
c/d

Not sure exactly what do you want. Anyway...

In[28]:=
HoldForm[a*b = c/d]
(% /. HoldForm[x_ = y_] :> Solve[x == y, x[[1]]])[[1,1]] /. (x_ -> y_)
-> HoldForm[x = y]

Out[28]=
HoldForm[a*b = c/d]

Out[29]=
HoldForm[a = c/(b*d)]

Regards
Dimitris

• Prev by Date: Re: activate more than one core in Mathematica 6.0 (for win)?
• Next by Date: Re: Integration with non-numeric parameters
• Previous by thread: Want Combinatorica graph to web page w alt text and links under each vertex
• Next by thread: Nested Dialogs