/* 1 2 mod, x%y == fmod(x,y)
*/
double nf_fmod(const Node *n, const Cell *c)
{
  Node *r = Right(n);

  return fmod( eval_tree( r, c), eval_tree( r->next, c) );
}