reserve i,j,k,n,m,l,s,t for Nat;
reserve a,b for Real;
reserve F for real-valued FinSequence;
reserve z for Complex;

theorem Th5:
  z|^1 = z
proof
  thus z|^1 = Product(<*z*>) by FINSEQ_2:59
    .= z;
end;
