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.<ubb2,ub2,ub3,ua,ub,uc1,ud1,us1,uD1,uS1,uZ1,uDZ1,uSC1,uC1> = PolynomialRing(QQ,14,order='invlex')
I = R.ideal([
  mynumerator((us1^2+uc1^2)-(1))
, mynumerator((ua*us1^2+ud1^2)-(1))
, mynumerator((us1)-(uS1/uZ1))
, mynumerator((uc1)-(uC1/uZ1))
, mynumerator((ud1)-(uD1/uZ1))
, mynumerator((uSC1)-(uS1*uC1))
, mynumerator((uDZ1)-(uD1*uZ1))
, mynumerator((ub)-(ua-1))
, mynumerator((ub2)-(2*ub))
, mynumerator((ub3)-(3*ub))
, mynumerator((ubb2)-(2*ub*ub))
])

ubb2 = fastfrac(ubb2)
ub2 = fastfrac(ub2)
ub3 = fastfrac(ub3)
ua = fastfrac(ua)
ub = fastfrac(ub)
uc1 = fastfrac(uc1)
ud1 = fastfrac(ud1)
us1 = fastfrac(us1)
uD1 = fastfrac(uD1)
uS1 = fastfrac(uS1)
uZ1 = fastfrac(uZ1)
uDZ1 = fastfrac(uDZ1)
uSC1 = fastfrac(uSC1)
uC1 = fastfrac(uC1)


uE = ((uS1^2))
uF = ((uC1^2))
uG = ((uE^2))
uH = ((uF^2))
uJ = ((uG^2))
uK = ((uH^2))
uL = (((uE+uF)^2-uH-uG))
uM = ((uL^2))
uN = (((uG+uL)^2-uJ-uM))
uP = (((uH+uL)^2-uK-uM))
uR = ((ubb2*uJ))
uQ = ((ub2*uN))
uT = ((ub3*uM))
uU = ((fastfrac(2)*uP))
uV = ((fastfrac(2)*uK))
uW = ((ua*uU))
uY = ((ua*uQ))
uRV = ((uR-uV))
uRQ = ((uR-uQ))
uUV = ((uU+uV))
uTW = ((uT+uW))
uTY = ((uT-uY))
uRQUV = ((uRQ+uUV))
uS3 = ((uS1*(uRV+uTW-fastfrac(2)*uUV)))
uC3 = ((uC1*(uRV-uTY+fastfrac(2)*uRQ)))
uD3 = ((uD1*(uTW-uRQUV)))
uZ3 = ((uZ1*(uTY-uRQUV)))
uSC3 = ((uS3*uC3))
uDZ3 = ((uD3*uZ3))

uc2 = (((uc1*uc1-ud1*us1*us1*ud1)/(uc1^2+(ud1*us1)^2))).reduce()
ud2 = (((ud1*ud1-ua*us1*uc1*us1*uc1)/(uc1^2+(ud1*us1)^2))).reduce()
us2 = (((uc1*us1*ud1+ud1*us1*uc1)/(uc1^2+(ud1*us1)^2))).reduce()
uc3 = (((uc2*uc1-ud1*us2*us1*ud2)/(uc2^2+(ud1*us2)^2))).reduce()
ud3 = (((ud1*ud2-ua*us1*uc1*us2*uc2)/(uc2^2+(ud1*us2)^2))).reduce()
us3 = (((uc2*us1*ud2+ud1*us2*uc1)/(uc2^2+(ud1*us2)^2))).reduce()

print(isidentity((us3^2+uc3^2)-(fastfrac(1))))
print(isidentity((ua*us3^2+ud3^2)-(fastfrac(1))))
print(isidentity((us3)-(uS3/uZ3)))
print(isidentity((uc3)-(uC3/uZ3)))
print(isidentity((ud3)-(uD3/uZ3)))
print(isidentity((uSC3)-(uS3*uC3)))
print(isidentity((uDZ3)-(uD3*uZ3)))

