let N be Nat; :: thesis: for seq being Real_Sequence of N st seq is convergent holds
- seq is convergent

let seq be Real_Sequence of N; :: thesis: ( seq is convergent implies - seq is convergent )
assume seq is convergent ; :: thesis: - seq is convergent
then (- 1) * seq is convergent by Th38;
hence - seq is convergent by Th11; :: thesis: verum