theorem Th16:
  1_R_Algebra_of_BoundedFunctions X = X -->1
proof
  R_Algebra_of_BoundedFunctions X is Subalgebra of RAlgebra X & 1_RAlgebra
  X = X -->1 by Th6;
  hence thesis by Th8;
end;
