:: deftheorem Def71 defines AddWitnessesTo FOMODEL4:def 71 :
for X being functional set
for S being Language
for D being RuleSet of S
for num being sequence of (ExFormulasOf S)
for b5 being sequence of (bool (X \/ (AllFormulasOf S))) holds
( b5 = (D,num) AddWitnessesTo X iff ( b5 . 0 = X & ( for mm being Element of NAT holds b5 . (mm + 1) = (D,(num . mm)) AddAsWitnessTo (b5 . mm) ) ) );