load crack$
lisp(nfct_:=7)$

off batch_mode$
list_of_variables:=
{}$
list_of_functions:=
{q2,
p2,
q6,
q3,
q1,
p1,
q4,
q5}$
list_of_equations:=
{q5,
p1*q4,
p1*q1,
p1*q3 + p1*q4,
5*p1*q6 - 3*p2*q4,
3*p1*q1 + 2*p1*q2 + p1*q4,
10*p1*q6 - 3*p2*q1,
p1*q1 - 2*p1*q3 + 4*p1*q4 + 2*p1*q5,
20*p1*q6 - 3*p2*q3 - 6*p2*q4,
20*p1*q6 - 3*p2*q1 - 3*p2*q3,
20*p1*q6 - 3*p2*q1 - 6*p2*q2,
10*p1*q6 - p2*q1 - 2*p2*q2 - p2*q3,
40*p1*q6 - 6*p2*q1 - 6*p2*q2 - 3*p2*q3,
20*p1*q6 - p2*q1 - 2*p2*q2 - 3*p2*q3 - 2*p2*q4}$
list_of_inequalities:=
{q6,p2}$

solution_:=crack(list_of_equations,
                 list_of_inequalities,
                 list_of_functions,
                 list_of_variables)$









end$

These data were produced with the following input:

lisp( old_history := 
'(a w nil n ~/web/htdocs/susy/N1/f1b0/o35/w2/w))$
