Help for this page

Select Code to Download


  1. or download this
    
    $t0 = 11111;
    ...
    $blocks[$datapoint[$kk][3]][($#{$blocks[$datapoint[$kk][3]]}) + 1][5] 
    += $t5;
    $blocks[$datapoint[$kk][3]][($#{$blocks[$datapoint[$kk][3]]}) + 1][6] 
    += $t6;
    
  2. or download this
    
    for $i6 ((reverse (($jj + 1))..($#{$blocks[$datapoint[$kk][3]]}) - 1))
    + {
    ...
                        $blocks[$datapoint[$kk][3]][$i6 + 1][5] = $blocks[
    +$datapoint[$kk][3]][$i6][5];
                        $blocks[$datapoint[$kk][3]][$i6 + 1][6] = $blocks[
    +$datapoint[$kk][3]][$i6][6];
                    }