<#> gv[*b] s # my $b = $b[$i]; <1> rv2av sKR/1 <0> padsv[$i:2,4] s <2> aelem sK/2 <0> padsv[$b:3,4] sRM*/LVINTRO <2> sassign vKS/2 ##

##

<#> gv[*b] s                      # $b[$i]
<1> rv2av sKR/1
<0> padsv[$i:2,3] s
<2> aelem sK/2

##

##

<0> padsv[$b:3,4] s               # $b

##

##

my $b = $b[$i]; ... $b ... $b ... $b    # 6 + 1*3 = 9 ops

##

##

$b[$i] ...  $b[$i]  ... $b[$i];         # 0 + 4*3 = 12 ops