reserve X,Y for set;
reserve R for domRing-like commutative Ring;
reserve c for Element of R;

theorem Th4:
  for R being associative non empty multLoopStr for a,b,c being
  Element of R holds a is_associated_to b & b is_associated_to c implies a
  is_associated_to c by Th2;
