/* -*-c-*-
*
- * $Id: f-binpoly.c,v 1.9 2004/04/08 01:36:15 mdw Exp $
+ * $Id$
*
* Binary fields with polynomial basis representation
*
static mp *frand(field *f, mp *d, grand *r)
{ return (mprand(d, f->nbits, r, 0)); }
-static int fzerop(field *ff, mp *x) { return (!MP_LEN(x)); }
+static int fzerop(field *ff, mp *x) { return (MP_ZEROP(x)); }
static mp *fadd(field *ff, mp *d, mp *x, mp *y) { return (gf_add(d, x, y)); }