Ejemplo n.º 1
0
Archivo: fp2e.c Proyecto: agl/dclxvi
int fp2e_iszero(const fp2e_t op)
{
  fpe_t ta, tb;
  fp2e_to_2fpe(ta, tb, op);
  int ret = fpe_iszero(ta);
  ret = ret && fpe_iszero(tb);
  return ret;
}
Ejemplo n.º 2
0
int fpe_isone(const fpe_t op)
{
  fpe_t t;
  int i;
  for(i=1;i<12;i++)
    t->v[i] = op->v[i];
  t->v[0] = op->v[0] - 1.;
  return fpe_iszero(t);
}
Ejemplo n.º 3
0
int fpe_iseq(const fpe_t op1, const fpe_t op2)
{
  fpe_t t;
  fpe_sub(t, op1, op2);
  return fpe_iszero(t);
}