consider a being Element of A;
reconsider X = 1 |-> a as FinSequence of A ;
A1: X is disjoint_valued
proof
let x, y be set ; :: according to PROB_2:def 3 :: thesis: ( x = y or X . x misses X . y )
assume A2: x <> y ; :: thesis: X . x misses X . y
per cases ( ( x in dom X & y in dom X ) or not x in dom X or not y in dom X ) ;
end;
end;
not X is empty by FUNCOP_1:19, RELAT_1:60;
hence ex b1 being FinSequence of A st
( not b1 is empty & b1 is disjoint_valued ) by A1; :: thesis: verum