let c, d be Real; :: thesis: ( 0 < c implies rseq (0,1,c,d) is convergent )
set f = rseq (0,1,c,d);
assume A1: 0 < c ; :: thesis: rseq (0,1,c,d) is convergent
take 0 ; :: according to SEQ_2:def 6 :: thesis: for b1 being object holds
( b1 <= 0 or ex b2 being set st
for b3 being set holds
( not b2 <= b3 or not b1 <= |.(((rseq (0,1,c,d)) . b3) - 0).| ) )

let p be Real; :: thesis: ( p <= 0 or ex b1 being set st
for b2 being set holds
( not b1 <= b2 or not p <= |.(((rseq (0,1,c,d)) . b2) - 0).| ) )

assume 0 < p ; :: thesis: ex b1 being set st
for b2 being set holds
( not b1 <= b2 or not p <= |.(((rseq (0,1,c,d)) . b2) - 0).| )

then consider n being Nat such that
A2: for m being Nat st n <= m holds
|.(((rseq (0,1,c,d)) . m) - 0).| < p by A1, Lm4;
take n ; :: thesis: for b1 being set holds
( not n <= b1 or not p <= |.(((rseq (0,1,c,d)) . b1) - 0).| )

thus for b1 being set holds
( not n <= b1 or not p <= |.(((rseq (0,1,c,d)) . b1) - 0).| ) by A2; :: thesis: verum