theorem
  r(#)(seq1/"seq)=(r(#)seq1)/"seq
proof
  thus r(#)(seq1/"seq) = r(#)(seq1(#)(seq)") .= (r(#)seq1)/"seq by Th12;
end;
