- i < pneigh.size() &&
- (delta = get_load() - pneigh[i]->get_load()) > 0.0 ;
- ++i) {
- send(pneigh[i], delta * alpha);
+ cont && i < pneigh.size() && pneigh[i]->get_load() < my_load ; ++i) {
+
+ double delta = my_load - pneigh[i]->get_load();
+ double transfer = alpha * delta;
+ XBT_DEBUG("delta = %g ; transfer = %g", delta, transfer);
+ if (pneigh[i]->get_load() + transfer <= get_load() - transfer) {
+ send(pneigh[i], transfer);
+ XBT_DEBUG("sent %g to %s", transfer, pneigh[i]->get_name());
+ } else {
+ cont = false;
+ }