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,
  k for Real,
  n for Nat,
  E for Element of S;

theorem
  for f be with_the_same_dom Functional_Sequence of X,REAL, n be Nat
  holds (superior_realsequence f).n = sup(f^\n) by MESFUNC8:9;
