_RL mult_gfo
& mult_gfo,
& mult_tp, mult_ers, mult_gfo,
mult_gfo = 0. _d 0
& + mult_gfo * objf_gfo(bi,bj) )