       Wrong behaviour in package Algebra`AlgebraicInequalities`

• To: mathgroup at smc.vnet.net
• Subject: [mg14845] Wrong behaviour in package Algebra`AlgebraicInequalities`
• From: Julian Stoev <stoev at usa.net>
• Date: Fri, 20 Nov 1998 02:16:54 -0500
• Organization: Seoul National University, Republic of Korea
• Sender: owner-wri-mathgroup at wolfram.com

```Dear All,

Here I will give two examples. They should give identical results, but
the second one fails. It has varaibles with subscripts.

In:=
SemialgebraicComponents[{(1*L1*(L2*L1 - L12^2))/8 > 0, L12 > 0}, {L1,
L2, L12}]
Out=
1
{{-1, -1, 2}, {-1, 1, 1}, {1, 1, -}}
8

In:=
SemialgebraicComponents[{(1*Subscript[L, 1]*
(Subscript[L, 2]*Subscript[L, 1] - Subscript[L, 12]^2))/8 > 0,
Subscript[L, 12] > 0},
{Subscript[L, 1], Subscript[L, 2], Subscript[L, 12]}] Part::partd:
Part specification 1[] is longer than depth of object.
Part::partd:
Part specification 1[] is longer than depth of object.
Part::partd:
Part specification 1[] is longer than depth of object.
General::stop:
Further output of Part::partd
will be suppressed during this calculation. Out=
2 {{-1, -1, L}, {-1, -1,
(-1)[]}, {-1, -1, -L   },
12

2
{-1, 1, L}, {-1, 1, (-1)[]}, {-1, 1, -L   }, {1, -1, L},
12

2
{1, -1, 1[]}, {1, -1, -L   }, {1, 1, L}, {1, 1, 1[]},
12

2
{1, 1, -L   }}
12