fixed bu with Bag_Array<T>::Compact ()
minor progress with Seqeunce<T> impl