/* -*-c-*-
*
- * $Id: gf-arith.c,v 1.4 2004/04/08 01:36:15 mdw Exp $
+ * $Id$
*
* Basic arithmetic on binary polynomials
*
RIG(add, gf_add)
RIG(mul, gf_mul)
+RIG(exp, gf_exp)
#undef RIG
{ "mul", tmul, { &type_mp, &type_mp, &type_mp, 0 } },
{ "sqr", tsqr, { &type_mp, &type_mp, 0 } },
{ "div", tdiv, { &type_mp, &type_mp, &type_mp, &type_mp, 0 } },
+ { "exp", texp, { &type_mp, &type_mp, &type_mp, 0 } },
{ "irred", tirred, { &type_mp, &type_int, 0 } },
{ 0, 0, { 0 } },
};