How to Equate Two Solutions in Mathematica for Variable J?

[BustedBreaks]

hi, I have two equations that I have used the Solve function in Mathematica to solve for A in both equations

What I am having trouble with is trying to equate the results and solving for another variable J automatically

Basically this is what I want to do:

Solve[Eqn1, A]

It gives {{A -> blah1}}

Solve[Eqn2, A]

It gives {{A -> blah2}}

Then

Solve[blah1=blah2, J]
It gives J -> blah3

automatically.THANKS!

 

[phyzguy]

It will simultaneously solve for A consistent with both equations if you just input: Solve[{Eq1, Eq2},A].