# 17:                 $minimumAmount = $1 / $2;
14             <;> nextstate(main 941 pmonks.pl:17) v:*,&,$
15             <#> gvsv[*1] s
16             <#> gvsv[*2] s
17             <2> divide[$minimumAmount:939,947] sK/TARGMY,2
# 18:                 $amount = $1;
18             <;> nextstate(main 941 pmonks.pl:18) v:*,&,$
19             <#> gvsv[*1] s
1a             <0> padsv[$amount:940,947] sRM*
1b             <2> sassign vKS/2
# 19:                 $weight = $2;
1c             <;> nextstate(main 941 pmonks.pl:19) v:*,&,{,$
1d             <#> gvsv[*2] s
1e             <0> padsv[$weight:940,947] sRM*
1f             <2> sassign vKS/2