def mynumerator(x):
  if parent(x) == R:
    return x
  return numerator(x)

class fastfrac:
  def __init__(self,top,bot=1):
    if parent(top) == ZZ or parent(top) == R:
      self.top = R(top)
      self.bot = R(bot)
    elif top.__class__ == fastfrac:
      self.top = top.top
      self.bot = top.bot * bot
    else:
      self.top = R(numerator(top))
      self.bot = R(denominator(top)) * bot
  def reduce(self):
    return fastfrac(self.top / self.bot)
  def sreduce(self):
    return fastfrac(I.reduce(self.top),I.reduce(self.bot))
  def iszero(self):
    return self.top in I and not (self.bot in I)
  def isdoublingzero(self):
    return self.top in J and not (self.bot in J)
  def __add__(self,other):
    if parent(other) == ZZ:
      return fastfrac(self.top + self.bot * other,self.bot)
    if other.__class__ == fastfrac:
      return fastfrac(self.top * other.bot + self.bot * other.top,self.bot * other.bot)
    return NotImplemented
  def __sub__(self,other):
    if parent(other) == ZZ:
      return fastfrac(self.top - self.bot * other,self.bot)
    if other.__class__ == fastfrac:
      return fastfrac(self.top * other.bot - self.bot * other.top,self.bot * other.bot)
    return NotImplemented
  def __neg__(self):
    return fastfrac(-self.top,self.bot)
  def __mul__(self,other):
    if parent(other) == ZZ:
      return fastfrac(self.top * other,self.bot)
    if other.__class__ == fastfrac:
      return fastfrac(self.top * other.top,self.bot * other.bot)
    return NotImplemented
  def __rmul__(self,other):
    return self.__mul__(other)
  def __div__(self,other):
    if parent(other) == ZZ:
      return fastfrac(self.top,self.bot * other)
    if other.__class__ == fastfrac:
      return fastfrac(self.top * other.bot,self.bot * other.top)
    return NotImplemented
  def __pow__(self,other):
    if parent(other) == ZZ:
      return fastfrac(self.top ^ other,self.bot ^ other)
    return NotImplemented

def isidentity(x):
  return x.iszero()

def isdoublingidentity(x):
  return x.isdoublingzero()

R.<ua,ub,uhalf,ux2,uy2,ux1,uy1,uR1,uXX1,uX1,uZZ1,uY1,uZ1,uR2,uXX2,uX2,uZZ2,uY2,uZ2> = PolynomialRing(QQ,19,order='invlex')
I = R.ideal([
  mynumerator((uy1^2)-(ux1^4+2*ua*ux1^2+1))
, mynumerator((ux1)-(uX1/uZ1))
, mynumerator((uy1)-(uY1/uZZ1))
, mynumerator((uXX1)-(uX1^2))
, mynumerator((uZZ1)-(uZ1^2))
, mynumerator((uR1)-(2*uX1*uZ1))
, mynumerator((uy2^2)-(ux2^4+2*ua*ux2^2+1))
, mynumerator((ux2)-(uX2/uZ2))
, mynumerator((uy2)-(uY2/uZZ2))
, mynumerator((uXX2)-(uX2^2))
, mynumerator((uZZ2)-(uZ2^2))
, mynumerator((uR2)-(2*uX2*uZ2))
, mynumerator((ub)-(-2*ua))
, mynumerator((uhalf*2)-(1))
])

J = I + R.ideal([0
, uR1-uR2
, uXX1-uXX2
, uX1-uX2
, uZZ1-uZZ2
, uY1-uY2
, uZ1-uZ2
])

ua = fastfrac(ua)
ub = fastfrac(ub)
uhalf = fastfrac(uhalf)
ux2 = fastfrac(ux2)
uy2 = fastfrac(uy2)
ux1 = fastfrac(ux1)
uy1 = fastfrac(uy1)
uR1 = fastfrac(uR1)
uXX1 = fastfrac(uXX1)
uX1 = fastfrac(uX1)
uZZ1 = fastfrac(uZZ1)
uY1 = fastfrac(uY1)
uZ1 = fastfrac(uZ1)
uR2 = fastfrac(uR2)
uXX2 = fastfrac(uXX2)
uX2 = fastfrac(uX2)
uZZ2 = fastfrac(uZZ2)
uY2 = fastfrac(uY2)
uZ2 = fastfrac(uZ2)


uA1 = ((uXX1))
uA2 = ((uXX2))
uA3 = ((uhalf*uR1))
uA4 = ((uhalf*uR2))
uA5 = ((uZZ1))
uA6 = ((uZZ2))
uA7 = ((uY1))
uA8 = ((uY2))
uA9 = ((uA7*uA8))
uA7 = ((uA7+uA3))
uA8 = ((uA8+uA4))
uA3 = ((uA3*uA4))
uA7 = ((uA7*uA8))
uA7 = ((uA7-uA9))
uA7 = ((uA7-uA3))
uA4 = ((uA1*uA2))
uA8 = ((uA5*uA6))
uA1 = ((uA1+uA5))
uA2 = ((uA2+uA6))
uA5 = ((uA1*uA2))
uA5 = ((uA5-uA4))
uA5 = ((uA5-uA8))
uA1 = ((uA8-uA4))
uA2 = ((uA8+uA4))
uA6 = ((ub*uA3))
uA6 = ((uA9-uA6))
uA6 = ((uA6*uA2))
uA3 = ((fastfrac(2)*uA3))
uA3 = ((uA5*uA3))
uA8 = ((uA6+uA3))
uA2 = ((uA7^2))
uA4 = ((uA1*uA7))
uA6 = ((uA1^2))
uX3 = ((uA7))
uY3 = ((uA8))
uZ3 = ((uA1))
uXX3 = ((uA2))
uR3 = ((fastfrac(2)*uA4))
uZZ3 = ((uA6))

ux3 = (((ux1*uy2+uy1*ux2)/(fastfrac(1)-(ux1*ux2)^2))).reduce()
uy3 = ((((fastfrac(1)+(ux1*ux2)^2)*(uy1*uy2+fastfrac(2)*ua*ux1*ux2)+fastfrac(2)*ux1*ux2*(ux1^2+ux2^2))/(fastfrac(1)-(ux1*ux2)^2)^2)).reduce()

print isidentity((uy3^2)-(ux3^4+fastfrac(2)*ua*ux3^2+fastfrac(1)))
print isidentity((ux3)-(uX3/uZ3))
print isidentity((uy3)-(uY3/uZZ3))
print isidentity((uXX3)-(uX3^2))
print isidentity((uZZ3)-(uZ3^2))
print isidentity((uR3)-(fastfrac(2)*uX3*uZ3))

unified = True
uXX4 = uXX3
uZZ4 = uZZ3
uR4 = uR3
uX4 = uX3
uY4 = uY3
uZ4 = uZ3
ux4 = (((ux1*uy1+uy1*ux1)/(fastfrac(1)-(ux1*ux1)^2))).reduce()
uy4 = ((((fastfrac(1)+(ux1*ux1)^2)*(uy1*uy1+fastfrac(2)*ua*ux1*ux1)+fastfrac(2)*ux1*ux1*(ux1^2+ux1^2))/(fastfrac(1)-(ux1*ux1)^2)^2)).reduce()
if unified: unified = isdoublingidentity((uy4^2)-(ux4^4+fastfrac(2)*ua*ux4^2+fastfrac(1)))
if unified: unified = isdoublingidentity((ux4)-(uX4/uZ4))
if unified: unified = isdoublingidentity((uy4)-(uY4/uZZ4))
if unified: unified = isdoublingidentity((uXX4)-(uX4^2))
if unified: unified = isdoublingidentity((uZZ4)-(uZ4^2))
if unified: unified = isdoublingidentity((uR4)-(fastfrac(2)*uX4*uZ4))
if unified: print "Unified"