let f be XFinSequence; :: thesis: for k1, k2 being Nat st k1 > k2 holds
mid f,k1,k2 = {}
let k1, k2 be Nat; :: thesis: ( k1 > k2 implies mid f,k1,k2 = {} )
assume A6:
k1 > k2
; :: thesis: mid f,k1,k2 = {}
reconsider k11 = k1, k21 = k2 as Element of NAT by ORDINAL1:def 13;
A2:
mid f,k1,k2 = (f | k21) /^ (k11 -' 1)
by AB540b;
k1 >= 0 + 1
by A6, NAT_1:13;
then A17:
k1 -' 1 = k1 - 1
by XREAL_1:235;
k1 >= k2 + 1
by A6, NAT_1:13;
then A18:
k1 - 1 >= (k2 + 1) - 1
by XREAL_1:11;
len (f | k21) <= k21
by TH80f;
hence
mid f,k1,k2 = {}
by A2, TH80e, A17, A18, XXREAL_0:2; :: thesis: verum