
theorem Th5:
  for X be set for q be FinSequence of BOOLEAN holds MergeSequence(
  <*>(bool X),q) = <*>(bool X)
proof
  let X be set;
  let q be FinSequence of BOOLEAN;
  len MergeSequence(<*>(bool X),q) = len <*>(bool X) by Def1
    .= 0;
  hence thesis;
end;
