for ($ires = $beginning[$iseg]; $ires <= $ending[$iseg]; $ires++) {