objf_hfluxmm = objf_hfluxmm
objf_hfluxmm = 0. _d 0
& objf_hfluxmm
& objf_hflux, objf_hfluxm, objf_hfluxmm, objf_hfluxsmoo,
_RL objf_hfluxmm
f_hfluxmm = f_hfluxmm + objf_hfluxmm