let i, I be set ; :: thesis: for M being ManySortedSet of I
for SF being MSSubsetFamily of M st i in I holds
SF . i is Subset-Family of (M . i)

let M be ManySortedSet of I; :: thesis: for SF being MSSubsetFamily of M st i in I holds
SF . i is Subset-Family of (M . i)

let SF be MSSubsetFamily of M; :: thesis: ( i in I implies SF . i is Subset-Family of (M . i) )
assume A1: i in I ; :: thesis: SF . i is Subset-Family of (M . i)
SF c= bool M by PBOOLE:def 23;
then SF . i c= (bool M) . i by A1, PBOOLE:def 5;
hence SF . i is Subset-Family of (M . i) by A1, MBOOLEAN:def 1; :: thesis: verum