let f, g be FinSequence of (TOP-REAL 2); :: thesis: ( f,g are_in_general_position implies (L~ f) /\ (L~ g) is finite )
assume A1:
f,g are_in_general_position
; :: thesis: (L~ f) /\ (L~ g) is finite
set AL = { (LSeg f,i) where i is Element of NAT : ( 1 <= i & i + 1 <= len f ) } ;
set BL = { (LSeg g,j) where j is Element of NAT : ( 1 <= j & j + 1 <= len g ) } ;
A2:
(L~ f) /\ (L~ g) = union (INTERSECTION { (LSeg f,i) where i is Element of NAT : ( 1 <= i & i + 1 <= len f ) } ,{ (LSeg g,j) where j is Element of NAT : ( 1 <= j & j + 1 <= len g ) } )
by SETFAM_1:39;
A3:
INTERSECTION { (LSeg f,i) where i is Element of NAT : ( 1 <= i & i + 1 <= len f ) } ,{ (LSeg g,j) where j is Element of NAT : ( 1 <= j & j + 1 <= len g ) } is finite
by Th11;
now let Z be
set ;
:: thesis: ( Z in INTERSECTION { (LSeg f,i) where i is Element of NAT : ( 1 <= i & i + 1 <= len f ) } ,{ (LSeg g,j) where j is Element of NAT : ( 1 <= j & j + 1 <= len g ) } implies Z is finite )assume A4:
Z in INTERSECTION { (LSeg f,i) where i is Element of NAT : ( 1 <= i & i + 1 <= len f ) } ,
{ (LSeg g,j) where j is Element of NAT : ( 1 <= j & j + 1 <= len g ) }
;
:: thesis: Z is finiteconsider X,
Y being
set such that A5:
(
X in { (LSeg f,i) where i is Element of NAT : ( 1 <= i & i + 1 <= len f ) } &
Y in { (LSeg g,j) where j is Element of NAT : ( 1 <= j & j + 1 <= len g ) } &
Z = X /\ Y )
by A4, SETFAM_1:def 5;
consider i being
Element of
NAT such that A6:
(
X = LSeg f,
i & 1
<= i &
i + 1
<= len f )
by A5;
consider j being
Element of
NAT such that A7:
(
Y = LSeg g,
j & 1
<= j &
j + 1
<= len g )
by A5;
Z is
trivial set
by A1, A5, A6, A7, Th10;
hence
Z is
finite
;
:: thesis: verum end;
hence
(L~ f) /\ (L~ g) is finite
by A2, A3, FINSET_1:25; :: thesis: verum