_RL mult_hfluxmm
& mult_hfluxmm,
& mult_hfluxmm, mult_sfluxmm,
mult_hfluxmm = 0. _d 0
f_hfluxmm2 = mult_hfluxmm*f_hfluxmm
& 'f_hfluxmm2 =', f_hfluxmm2, mult_hfluxmm