reserve X for non empty set,
  Y for set,
  S for SigmaField of X,
  M for sigma_Measure of S,
  f,g for PartFunc of X,COMPLEX,
  r for Real,
  c for Complex,
  E,A,B for Element of S;

theorem Th34:
  for X be non empty set, S be SigmaField of X, M be sigma_Measure
of S, f,g be PartFunc of X,REAL st f is_integrable_on M & g is_integrable_on M
  holds f-g is_integrable_on M
proof
  let X be non empty set, S be SigmaField of X, M be sigma_Measure of S, f,g
  be PartFunc of X,REAL;
  assume that
A1: f is_integrable_on M and
A2: g is_integrable_on M;
  R_EAL g is_integrable_on M by A2;
  then (-jj)(#)R_EAL g is_integrable_on M by MESFUNC5:110;
  then -R_EAL g is_integrable_on M by MESFUNC2:9;
  then
A3: R_EAL -g is_integrable_on M by MESFUNC6:28;
  R_EAL f is_integrable_on M by A1;
  then R_EAL f + R_EAL -g is_integrable_on M by A3,MESFUNC5:108;
  then R_EAL(f-g) is_integrable_on M by MESFUNC6:23;
  hence thesis;
end;
