:: deftheorem Def5 defines Complement PROB_3:def 5 :
for X being set
for F1, b3 being FinSequence of bool X holds
( b3 = Complement F1 iff ( len b3 = len F1 & ( for n being Nat st n in dom b3 holds
b3 . n = (F1 . n) ` ) ) );