& mult_lwflux,
_RL mult_lwflux
& mult_lwflux, mult_lwdown, mult_evap,
mult_lwflux = 0. _d 0
& + mult_lwflux * ( objf_lwflux(bi,bj)+objf_lwfluxm(bi,bj)