Function for Finding the Modulo of A Polynomial Without Having to Worry About Exponents

function modulo = modWOExp(a, n, z)
modulo = 1;
x = intDivision(a, z);
while n > 0
  mod2 = intDivision(n, 2);
  if mod2(2) == 1
      modulo = modulo * x(2);
      modZ = intDivision(modulo, z);
      modulo = modZ(2);
  end
  mod2(1) = x(2) * x(2);
  x = intDivision(mod2(1), z);
  someTemp = intdivision(n, 2);
  n = someTemp(1);
end