## How to isolate the undetermined variables on Mathematica [closed]

I have a system of algebraic equations that I am trying to solve on Mathematica. Unfortunately, the algebraic equations I have are degenerate so Mathematica will give an error "Solve::svars: Equations may not give solutions for all "solve" variables" when I try to solve for the variables.

I want to keep the variables that Mathematica does solve for, but somehow isolate the variables that Mathematica does not solve. For example, the output of my Solve command looks like this:

{{$d$r[1, 1, 1] -> -(27/8),

$d$r[1, 1, 2] -> -((9 Sqrt[3])/8),

$d$r[1, 1, 3] -> -$d$r[1, 2, 3] - $d$r[1, 3, 3] - $d$r[1, 4, 3] - 2/3 $d$r[2, 1, 3] - 2/3 $d$r[2, 2, 3] - 2/3 $d$r[2, 3, 3] - 2/3 $d$r[2, 4, 3] - 1/3 $d$r[3, 1, 3] - 1/3 $d$r[3, 2, 3] - 1/3 $d$r[3, 3, 3] - 1/3 $d$r[3, 4, 3], $d$r[1, 2,1] -> -(21/8),

$d$r[1, 2, 2] -> -((3 Sqrt[3])/8),

$d$r[1, 3, 1] -> -(15/8),

. . . .

$d$r[4, 1, 3] -> 1/3 $d$r[1, 2, 3] + 2/3 $d$r[1, 3, 3] + [Delta]r[1, 4, 3] - 1/3 $d$r[2, 1, 3] + 1/3 $d$r[2, 3, 3] + 2/3 $d$r[2, 4, 3] - 2/3 $d$r[3, 1, 3] - 1/3 $d$r[3, 2, 3] + 1/3 $d$r[3, 4, 3] - 2/3 $d$r[4, 2, 3] - 1/3 $d$r[4, 3, 3],

$d$r[4, 2, 1] -> 15/8,

$d$r[4, 2, 2] -> -((3 Sqrt[3])/8),

Clearly some of the variables converge to a value while the other variables such as $d$r[1,1,3] and $d$r[4, 1, 3] are expressed in terms of the other variables. Is there a way to isolate the undetermined variables on Mathematica?

-
see: meta.mathoverflow.net/discussion/1120/… If you have an actual mathematics question, that may get an answer. – Will Jagy Aug 22 2011 at 21:22
try posting at math.stackexchange.com/questions?sort=newest – Will Jagy Aug 22 2011 at 21:23