let T be non empty RelStr ; :: thesis: for A being Subset of T
for n being Element of NAT holds (Fcl (A ` ),n) ` = Fint A,n
let A be Subset of T; :: thesis: for n being Element of NAT holds (Fcl (A ` ),n) ` = Fint A,n
let n be Element of NAT ; :: thesis: (Fcl (A ` ),n) ` = Fint A,n
Fint A,n =
((Fint ((A ` ) ` ),n) ` ) `
.=
(Fcl (A ` ),n) `
by Th27
;
hence
(Fcl (A ` ),n) ` = Fint A,n
; :: thesis: verum