let x be set ; for U being non empty set
for u being Element of U
for q1, q2 being b1 -valued FinSequence holds (x SubstWith u) . (q1 ^ q2) = ((x SubstWith u) . q1) ^ ((x SubstWith u) . q2)
let U be non empty set ; for u being Element of U
for q1, q2 being U -valued FinSequence holds (x SubstWith u) . (q1 ^ q2) = ((x SubstWith u) . q1) ^ ((x SubstWith u) . q2)
let u be Element of U; for q1, q2 being U -valued FinSequence holds (x SubstWith u) . (q1 ^ q2) = ((x SubstWith u) . q1) ^ ((x SubstWith u) . q2)
let q1, q2 be U -valued FinSequence; (x SubstWith u) . (q1 ^ q2) = ((x SubstWith u) . q1) ^ ((x SubstWith u) . q2)
set e = x SubstWith u;
set w1 = q1;
set w2 = q2;
set w = q1 ^ q2;
set W1 = (x,u) -SymbolSubstIn q1;
set W2 = (x,u) -SymbolSubstIn q2;
set W = (x,u) -SymbolSubstIn (q1 ^ q2);
( (x SubstWith u) . q1 = (x,u) -SymbolSubstIn q1 & (x SubstWith u) . q2 = (x,u) -SymbolSubstIn q2 & (x SubstWith u) . (q1 ^ q2) = (x,u) -SymbolSubstIn (q1 ^ q2) )
by Def22;
hence
(x SubstWith u) . (q1 ^ q2) = ((x SubstWith u) . q1) ^ ((x SubstWith u) . q2)
by Lm45; verum