_RL mult_sshv4cost(NSSHV4COST)
& mult_sshv4cost,
& mult_hmean, mult_h, mult_sshv4cost,
mult_sshv4cost(k) = 0. _d 0