
theorem Th9:
  for R being non empty RelStr,
      X being Subset of R holds
    Lap X = LAp X
  proof
    let R be non empty RelStr,
        X be Subset of R;
    Uap X` = UAp X` by Th8;
    hence thesis;
  end;
