reserve C for CategoryStr;
reserve f,f1,f2,f3 for morphism of C;
reserve g1,g2 for morphism of C opp;

theorem
  C is with_identities iff the CategoryStr of C is with_identities
  by Th17,Th19;
