theorem Th38:
  FinUnion A is having_a_unity
proof
  {}.A is_a_unity_wrt FinUnion A by Th37;
  hence thesis;
end;
