my $pv = $hv - 1;
    $pv = $#{$blo­cks[$i]}   if  $pv < 0;