let n be Element of NAT ; :: thesis: for s1, s2, s3 being FinSequence st len s1 = n & len s2 = n & len s3 = n holds
<*s1,s2,s3*> is tabular
let s1, s2, s3 be FinSequence; :: thesis: ( len s1 = n & len s2 = n & len s3 = n implies <*s1,s2,s3*> is tabular )
assume that
A1:
len s1 = n
and
A2:
len s2 = n
and
A3:
len s3 = n
; :: thesis: <*s1,s2,s3*> is tabular
now take n =
n;
:: thesis: for x being set st x in rng <*s1,s2,s3*> holds
ex r being FinSequence st
( x = r & len r = n )let x be
set ;
:: thesis: ( x in rng <*s1,s2,s3*> implies ex r being FinSequence st
( x = r & len r = n ) )assume
x in rng <*s1,s2,s3*>
;
:: thesis: ex r being FinSequence st
( x = r & len r = n )then A4:
x in {s1,s2,s3}
by FINSEQ_2:148;
then reconsider r =
x as
FinSequence by ENUMSET1:def 1;
take r =
r;
:: thesis: ( x = r & len r = n )thus
(
x = r &
len r = n )
by A1, A2, A3, A4, ENUMSET1:def 1;
:: thesis: verum end;
hence
<*s1,s2,s3*> is tabular
by MATRIX_1:def 1; :: thesis: verum