theorem Th7: :: JORDAN1F:7

for C being compact non horizontal non vertical Subset of (TOP-REAL 2)
for n being Nat holds (Upper_Seq (C,n)) /. (len (Upper_Seq (C,n))) = E-max (L~ (Cage (C,n)))