Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1999
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1999

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Solve and Trig functions

  • To: mathgroup at smc.vnet.net
  • Subject: [mg19313] Re: Solve and Trig functions
  • From: "Allan Hayes" <hay at haystack.demon.co.uk>
  • Date: Sat, 14 Aug 1999 23:42:46 -0400
  • References: <7p308e$aog@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Kevin:

Here'xs A rather inelegant way


eq1 = a1 + b1 == Sin[fi];
eq2 = a2 + b2 == Cos[fi];


Solve[{eq1, eq2, Sin[fi] == t Cos[fi]}, {t}, {fi}] (* fi not to appear in
solution*)

Out[51]=
{{t -> (a1 + b1)/(a2 + b2)}}

Allan
---------------------
Allan Hayes
Mathematica Training and Consulting
Leicester UK
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565



Kevin J. McCann <kevin.mccann at jhuapl.edu> wrote in message
news:7p308e$aog at smc.vnet.net...
>
> If I have the following two equations:
>
> eq1 = a1 + b1 == Sin[fi];
> eq2 = a2 + b2 == Cos[fi];
>
> It is clear that
>
> Tan[fi] == (a1+b1)/(a2+b2)
>
> but how do I get Mathematica to recoginize this? This problem is trivial,
but
> with more complicated expressions, the answer may not be immediately
> obvious.
>
> Thanks,
>
> Kevin
>
> Kevin J. McCann
> Johns Hopkins University APL
>



  • Prev by Date: Re: Pattern example
  • Next by Date: Tricky Symbolizations with the Notation Package (Was Subscripts, Doh!!!)
  • Previous by thread: Re: Solve and Trig functions
  • Next by thread: Re: Solve and Trig functions