:: deftheorem Def2 defines joined_FinSeq MEASURE9:def 2 :
for D being non empty set
for Y being FinSequenceSet of D
for F being FinSequence of Y
for b4 being FinSequence of D holds
( b4 = joined_FinSeq F iff ( len b4 = Sum (Length F) & ( for n being Nat st n in dom b4 holds
ex k, m being Nat st
( 1 <= m & m <= len (F . (k + 1)) & k < len F & m + (Sum (Length (F | k))) = n & n <= Sum (Length (F | (k + 1))) & b4 . n = (F . (k + 1)) . m ) ) ) );