theorem
  R is_transitive_in X implies R~ is_transitive_in X by Lm13;
