 reserve Exx for Real;
 reserve Omega,Omega2 for non empty set;
 reserve Sigma for SigmaField of Omega;
 reserve Sigma2 for SigmaField of Omega2;
 reserve X,Y,Z for Function of Omega,REAL;

theorem Th8:
  for r being Real,
      X being random_variable of Sigma,Borel_Sets holds
    r(#)X is random_variable of Sigma, Borel_Sets
proof
  let r be Real;
  let Y be random_variable of Sigma, Borel_Sets;
  reconsider Y as Real-Valued-Random-Variable of Sigma by RANDOM_3:9;
  r(#)Y is Real-Valued-Random-Variable of Sigma;
  hence thesis by RANDOM_3:9;
end;
