set IT = { A where A is Element of Fin (PFuncs (V,C)) : ( ( for u being set st u in A holds
u is finite ) & ( for s, t being Element of PFuncs (V,C) st s in A & t in A & s c= t holds
s = t ) ) } ;
{ A where A is Element of Fin (PFuncs (V,C)) : ( ( for u being set st u in A holds
u is finite ) & ( for s, t being Element of PFuncs (V,C) st s in A & t in A & s c= t holds
s = t ) ) } c= Fin (PFuncs (V,C))
proof
let x be
object ;
TARSKI:def 3 ( not x in { A where A is Element of Fin (PFuncs (V,C)) : ( ( for u being set st u in A holds
u is finite ) & ( for s, t being Element of PFuncs (V,C) st s in A & t in A & s c= t holds
s = t ) ) } or x in Fin (PFuncs (V,C)) )
assume
x in { A where A is Element of Fin (PFuncs (V,C)) : ( ( for u being set st u in A holds
u is finite ) & ( for s, t being Element of PFuncs (V,C) st s in A & t in A & s c= t holds
s = t ) ) }
;
x in Fin (PFuncs (V,C))
then
ex
B being
Element of
Fin (PFuncs (V,C)) st
(
B = x & ( for
u being
set st
u in B holds
u is
finite ) & ( for
s,
t being
Element of
PFuncs (
V,
C) st
s in B &
t in B &
s c= t holds
s = t ) )
;
hence
x in Fin (PFuncs (V,C))
;
verum
end;
hence
{ A where A is Element of Fin (PFuncs (V,C)) : ( ( for u being set st u in A holds
u is finite ) & ( for s, t being Element of PFuncs (V,C) st s in A & t in A & s c= t holds
s = t ) ) } is Subset of (Fin (PFuncs (V,C)))
; verum