:: deftheorem Def9A defines XFS2FS AFINSQ_1:def 9 :
for q being XFinSequence
for b2 being FinSequence holds
( b2 = XFS2FS q iff ( len b2 = len q & ( for i being Nat st 1 <= i & i <= len q holds
q . (i - 1) = b2 . i ) ) );