Re: function manipulation

• To: mathgroup at smc.vnet.net
• Subject: [mg127822] Re: function manipulation
• From: Bob Hanlon <hanlonr357 at gmail.com>
• Date: Fri, 24 Aug 2012 05:05:12 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-newout@smc.vnet.net
• Delivered-to: mathgroup-newsend@smc.vnet.net
• References: <20120824005115.06CE5687C@smc.vnet.net>

gl2[x_] = Module[
{eqn, z = (Subscript[\[Tau], xy]^\[Prime]\[Prime])[x]},
eqn = Simplify[
b Subscript[e, 1] Subscript[e, 2] Subscript[t, 1] *
Subscript[t, 2] Subscript[t, K] z ==
b Subscript[g, K] (Subscript[e, 1] Subscript[t, 1] +
Subscript[e, 2] Subscript[t, 2]) Subscript[\[Tau], xy][x],
b != 0];
(z /. Solve[eqn, z][[1]]) - z == 0]

Bob Hanlon

On Thu, Aug 23, 2012 at 8:51 PM, Andreas Talmon
<talmon at fsm.tu-darmstadt.de> wrote:
> Hi All,
>
> I got an function in the following form:
>
> gl2[x_] :=
>  b Subscript[e, 1] Subscript[e, 2] Subscript[t, 1] Subscript[t, 2] Subscript[t, K] (Subscript[\[Tau], xy]^\[Prime]\[Prime])[x] ==
>   b Subscript[g,
>    K] (Subscript[e, 1] Subscript[t, 1] +
>      Subscript[e, 2] Subscript[t, 2]) Subscript[\[Tau], xy][x]
>
> I am aming to reorder the Terms to the following Form:
>
> gl2[x_] := (
>     b Subscript[g,
>      K] (Subscript[e, 1] Subscript[t, 1] +
>        Subscript[e, 2] Subscript[t, 2]))/(
>     b Subscript[e, 1] Subscript[e, 2] Subscript[t, 1] Subscript[t, 2]
>       Subscript[t, K]) Subscript[\[Tau], xy][x] - \!\(
> \(\*SubsuperscriptBox[\(\[Tau]\), \(xy\), \(\[Prime]\[Prime]\)]\)[
>     x]\) == 0
>
> Is there any way to tell mathematica to do this for me?.
>
> Also I would like to Cancel the faktor b which is b!=0
>
> Thanks for any help
>
> Best regards,
>
> Andreas Talmon
>

• Prev by Date: Re: Group and Replace itens sequence in a list
• Next by Date: Find the value of x & y
• Previous by thread: function manipulation
• Next by thread: Re: function manipulation