Group Abstract

Message Boards

WOLFRAM COMMUNITY

9.3K Views

3 Replies

0 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Mathematica Algebra Wolfram Language

eliminating irrational (Sqrt) terms in long equation

abhishek sharma

abhishek sharma, ab college

Posted 11 years ago

I have the following equation with 15 terms. It has basically 6 variables, namely a, b, c, d, e, f. I wish to remove the square roots from this equation by successively squaring and manipulation. Can Mathematica help in it? R1 Sqrt[a] Sqrt[b] + R2 Sqrt[a] Sqrt[c] + R3 Sqrt[a] Sqrt[d] + R4 Sqrt[a] Sqrt[h] + R5 Sqrt[a] Sqrt[i] + R6 Sqrt[b] Sqrt[c] + R7 Sqrt[b] Sqrt[d] + R8 Sqrt[b] Sqrt[i] + R9 Sqrt[b] Sqrt[h] + R10 Sqrt[c] Sqrt[h] + R11 Sqrt[c] Sqrt[i] + R12 Sqrt[c] Sqrt[d] + R13 Sqrt[d] Sqrt[h] + R14 Sqrt[d] Sqrt[i] + R15 Sqrt[h] Sqrt[i] == 0 Attachments:

I have the following equation with 15 terms. It has basically 6 variables, namely a, b, c, d, e, f.

I wish to remove the square roots from this equation by successively squaring and manipulation.

Can Mathematica help in it?

R1 Sqrt[a] Sqrt[b] + R2 Sqrt[a] Sqrt[c] + R3 Sqrt[a] Sqrt[d] + 
  R4 Sqrt[a] Sqrt[h] + R5 Sqrt[a] Sqrt[i] + R6 Sqrt[b] Sqrt[c] + 
  R7 Sqrt[b] Sqrt[d] + R8 Sqrt[b] Sqrt[i] + R9 Sqrt[b] Sqrt[h] + 
  R10 Sqrt[c] Sqrt[h] + R11 Sqrt[c] Sqrt[i] + R12 Sqrt[c] Sqrt[d] + 
  R13 Sqrt[d] Sqrt[h] + R14 Sqrt[d] Sqrt[i] + R15 Sqrt[h] Sqrt[i] == 0