theorem Th79:
  A? = A |^ (0, 1)
proof
  thus A? = (A |^ 0) \/ (A |^ (0 + 1)) by Th75
    .= A |^ (0, 1) by Th28;
end;
