reserve p,q,r for FinSequence,
  x,y for object;

theorem Th44:
  for R being Relation, a,b being object st
  a,b are_convergent<=1_wrt R holds a,b are_convergent_wrt R
proof
  let R be Relation, a,b be object;
  given c being object such that
A1: ([a,c] in R or a = c) & ([b,c] in R or b = c);
  take c;
  thus thesis by A1,Th12,Th15;
end;
