theorem
  product A in E implies EnsCatProductObj A is A-CatProduct-like
  proof
    assume
A1: product A in E;
    take EnsCatProduct A;
    thus thesis by A1,Th8;
end;
