& mult_transp
_RL mult_transp
& mult_usercost, mult_transp,
mult_transp = 0. _d 0
f_transp = mult_transp*objf_transp