:: deftheorem Def2 defines ^ RVSUM_4:def 10 :
for f being FinSequence
for g being XFinSequence
for b3 being FinSequence holds
( b3 = f ^ g iff ( dom b3 = Seg ((len f) + (len g)) & ( for k being Nat st k in dom f holds
b3 . k = f . k ) & ( for k being Nat st k in dom g holds
b3 . (((len f) + k) + 1) = g . k ) ) );