theorem Th4:
  Product(1|->rr) = rr
proof
  thus Product(1|->rr) = Product<*rr*> by FINSEQ_2:59
    .= rr;
end;
