let Omega be non empty set ; :: thesis: for Sigma being SigmaField of Omega
for f being Real-Valued-Random-Variable of Sigma
for r being Real holds r (#) f is Real-Valued-Random-Variable of Sigma

let Sigma be SigmaField of Omega; :: thesis: for f being Real-Valued-Random-Variable of Sigma
for r being Real holds r (#) f is Real-Valued-Random-Variable of Sigma

let f be Real-Valued-Random-Variable of Sigma; :: thesis: for r being Real holds r (#) f is Real-Valued-Random-Variable of Sigma
let r be Real; :: thesis: r (#) f is Real-Valued-Random-Variable of Sigma
set X = [#] Sigma;
dom f = [#] Sigma by FUNCT_2:def 1;
then r (#) f is [#] Sigma -measurable by MESFUNC6:21;
hence r (#) f is Real-Valued-Random-Variable of Sigma ; :: thesis: verum