& mult_kapredi,
_RL mult_kapredi
& mult_kapgm, mult_kapredi, mult_diffkr,
mult_kapredi = 0. _d 0
& + mult_kapredi * objf_kapredi(bi,bj)