consider X being non empty set such that
A1: S c= [:NAT,(NAT *),(X *):] by Def1;
I in S ;
then AddressPart I in X * by A1, RECDEF_2:2;
hence AddressPart I is FinSequence-like ; :: thesis: verum