_RL mult_sfluxmm
& mult_sfluxmm,
& mult_hfluxmm, mult_sfluxmm,
mult_sfluxmm = 0. _d 0
f_sfluxmm2 = mult_sfluxmm*f_sfluxmm
& 'f_sfluxmm2 =', f_sfluxmm2, mult_sfluxmm