Field exponentiation. Add field size to field structure. Make check
[u/mdw/catacomb] / f-prime.c
index 9b1ceb6..b1c4367 100644 (file)
--- a/f-prime.c
+++ b/f-prime.c
@@ -170,6 +170,7 @@ field *field_prime(mp *p)
   f->f.m = f->mm.m;
   f->f.nbits = mp_bits(p);
   f->f.noctets = (f->f.nbits + 7) >> 3;
+  f->f.q = f->mm.m;
   return (&f->f);
 }