/* 1 2 nexttoward(x,y) == next value following x in the direction of y
*/
double nf_nexttoward(const Node *n, const Cell *c)
{
  Node *r = Right(n);

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