let S be non empty non void ManySortedSign ; :: thesis: for o being OperSymbol of S
for V being V5 ManySortedSet of the carrier of S
for x being set holds
( x is ArgumentSeq of Sym o,V iff x is Element of Args o,(FreeMSA V) )
let o be OperSymbol of S; :: thesis: for V being V5 ManySortedSet of the carrier of S
for x being set holds
( x is ArgumentSeq of Sym o,V iff x is Element of Args o,(FreeMSA V) )
let V be V5 ManySortedSet of the carrier of S; :: thesis: for x being set holds
( x is ArgumentSeq of Sym o,V iff x is Element of Args o,(FreeMSA V) )
A1:
FreeMSA V = MSAlgebra(# (FreeSort V),(FreeOper V) #)
by MSAFREE:def 16;
let x be set ; :: thesis: ( x is ArgumentSeq of Sym o,V iff x is Element of Args o,(FreeMSA V) )
assume
x is Element of Args o,(FreeMSA V)
; :: thesis: x is ArgumentSeq of Sym o,V
then reconsider x = x as Element of Args o,(FreeMSA V) ;
rng x c= TS (DTConMSA V)
then reconsider x = x as FinSequence of TS (DTConMSA V) by FINSEQ_1:def 4;
( Sym o,V ==> roots x & TS (DTConMSA V) = S -Terms V )
by A1, MSAFREE:10, MSATERM:def 1;
hence
x is ArgumentSeq of Sym o,V
by MSATERM:21; :: thesis: verum