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
  __truediv__ = __div__
  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,ux2,uy2,ux1,uy1,uZZZ1,uZZ1,uX1,uY1,uZZZ2,uZZ2,uX2,uY2> = PolynomialRing(QQ,14,order='invlex')
I = R.ideal([
  mynumerator((uy1^2)-(ux1^3+ua*ux1+ub))
, mynumerator((ux1)-(uX1/uZZ1))
, mynumerator((uy1)-(uY1/uZZZ1))
, mynumerator((uZZ1^3)-(uZZZ1^2))
, mynumerator((uy2^2)-(ux2^3+ua*ux2+ub))
, mynumerator((ux2)-(uX2/uZZ2))
, mynumerator((uy2)-(uY2/uZZZ2))
, mynumerator((uZZ2^3)-(uZZZ2^2))
])

J = I + R.ideal([0
, uZZZ1-uZZZ2
, uX1-uX2
, uZZ1-uZZ2
, uY1-uY2
])

ua = fastfrac(ua)
ub = fastfrac(ub)
ux2 = fastfrac(ux2)
uy2 = fastfrac(uy2)
ux1 = fastfrac(ux1)
uy1 = fastfrac(uy1)
uZZZ1 = fastfrac(uZZZ1)
uZZ1 = fastfrac(uZZ1)
uX1 = fastfrac(uX1)
uY1 = fastfrac(uY1)
uZZZ2 = fastfrac(uZZZ2)
uZZ2 = fastfrac(uZZ2)
uX2 = fastfrac(uX2)
uY2 = fastfrac(uY2)


uU1 = ((uX1*uZZ2))
uU2 = ((uX2*uZZ1))
uS1 = ((uY1*uZZZ2))
uS2 = ((uY2*uZZZ1))
uP = ((uU2-uU1))
uR = ((uS2-uS1))
uPP = ((uP^2))
uPPP = ((uP*uPP))
uQ = ((uU1*uPP))
uX3 = ((uR^2-uPPP-fastfrac(2)*uQ))
uY3 = ((uR*(uQ-uX3)-uS1*uPPP))
uZZ3 = ((uZZ1*uZZ2*uPP))
uZZZ3 = ((uZZZ1*uZZZ2*uPPP))

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

print(isidentity((uy3^2)-(ux3^3+ua*ux3+ub)))
print(isidentity((ux3)-(uX3/uZZ3)))
print(isidentity((uy3)-(uY3/uZZZ3)))
print(isidentity((uZZ3^3)-(uZZZ3^2)))

unified = True
uZZZ4 = uZZZ3
uZZ4 = uZZ3
uX4 = uX3
uY4 = uY3
ux4 = (((fastfrac(3)*ux1^2+ua)^2/(fastfrac(2)*uy1)^2-ux1-ux1)).reduce()
uy4 = (((fastfrac(2)*ux1+ux1)*(fastfrac(3)*ux1^2+ua)/(fastfrac(2)*uy1)-(fastfrac(3)*ux1^2+ua)^3/(fastfrac(2)*uy1)^3-uy1)).reduce()
if unified: unified = isdoublingidentity((uy4^2)-(ux4^3+ua*ux4+ub))
if unified: unified = isdoublingidentity((ux4)-(uX4/uZZ4))
if unified: unified = isdoublingidentity((uy4)-(uY4/uZZZ4))
if unified: unified = isdoublingidentity((uZZ4^3)-(uZZZ4^2))
if unified: print("Unified")