deffunc H1( Real) -> set = 1 / ($1 + r);
ex seq being Complex_Sequence st
for n being Nat holds seq . n = H1(n) from COMSEQ_1:sch 1();
hence ex b1 being Complex_Sequence st
for n being Nat holds b1 . n = 1 / (n + r) ; :: thesis: verum