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

let Sigma be SigmaField of Omega; :: thesis: for f being Real-Valued-Random-Variable of Sigma holds abs f is Real-Valued-Random-Variable of Sigma
let f be Real-Valued-Random-Variable of Sigma; :: thesis: abs f is Real-Valued-Random-Variable of Sigma
A2: f is_measurable_on [#] Sigma by Def2;
( dom f = [#] Sigma & R_EAL f is_measurable_on [#] Sigma ) by A2, FUNCT_2:def 1;
then |.(R_EAL f).| is_measurable_on [#] Sigma by MESFUNC2:27;
then R_EAL (abs f) is_measurable_on [#] Sigma by MESFUNC6:1;
then abs f is_measurable_on [#] Sigma ;
hence abs f is Real-Valued-Random-Variable of Sigma by Def2; :: thesis: verum