theorem Th20: :: LIMFUNC1:20
for seq being Real_Sequence st ( for n being Nat holds seq . n = n ) holds
seq is divergent_to+infty