InitialSubset function

InitialSubset