theorem
  R is_connected_in X implies R~ is_connected_in X by Lm15;
