theorem Th6:
  z|^(s+1) = z|^s * z
proof
  thus z|^(s+1) = Product((s |-> z) ^ <*z*>) by FINSEQ_2:60
    .= z|^s*z by RVSUM_1:96;
end;
