let n be Element of NAT ; :: thesis: for C being compact non horizontal non vertical Subset of (TOP-REAL 2) holds (N-max (L~ (Cage C,n))) .. (Upper_Seq C,n) <= (E-max (L~ (Cage C,n))) .. (Upper_Seq C,n)
let C be compact non horizontal non vertical Subset of (TOP-REAL 2); :: thesis: (N-max (L~ (Cage C,n))) .. (Upper_Seq C,n) <= (E-max (L~ (Cage C,n))) .. (Upper_Seq C,n)
set Wmi = W-min (L~ (Cage C,n));
set Nma = N-max (L~ (Cage C,n));
set Ema = E-max (L~ (Cage C,n));
set Rot = Rotate (Cage C,n),(W-min (L~ (Cage C,n)));
A1: L~ (Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) = L~ (Cage C,n) by REVROT_1:33;
then A2: E-max (L~ (Cage C,n)) in rng (Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) by SPRECT_2:50;
W-min (L~ (Cage C,n)) in rng (Cage C,n) by SPRECT_2:47;
then (Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) /. 1 = W-min (L~ (Cage C,n)) by FINSEQ_6:98;
then A3: (N-max (L~ (Cage C,n))) .. (Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) <= (E-max (L~ (Cage C,n))) .. (Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) by A1, SPRECT_5:26;
N-max (L~ (Cage C,n)) in rng (Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) by A1, SPRECT_2:44;
then ( Upper_Seq C,n = (Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) -: (E-max (L~ (Cage C,n))) & (N-max (L~ (Cage C,n))) .. ((Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) -: (E-max (L~ (Cage C,n)))) = (N-max (L~ (Cage C,n))) .. (Rotate (Cage C,n),(W-min (L~ (Cage C,n)))) ) by A2, A3, JORDAN1E:def 1, SPRECT_5:3;
hence (N-max (L~ (Cage C,n))) .. (Upper_Seq C,n) <= (E-max (L~ (Cage C,n))) .. (Upper_Seq C,n) by A2, A3, SPRECT_5:3; :: thesis: verum