defpred S1[ Element of the carrier of I[01] , Element of the carrier of I[01] , set ] means $3 = ((1 - $2) * (P . $1)) + ($2 * (Q . $1));
A1:
for m, n being Element of the carrier of I[01] ex z being Element of T st S1[m,n,z]
consider F being Function of [:the carrier of I[01] ,the carrier of I[01] :],the carrier of T such that
A8:
for m, n being Element of the carrier of I[01] holds S1[m,n,F . m,n]
from BINOP_1:sch 3(A1);
reconsider F = F as Function of [:I[01] ,I[01] :],T by Lm1;
take
F
; for s, t being Element of I[01] holds F . s,t = ((1 - t) * (P . s)) + (t * (Q . s))
let s, t be Element of the carrier of I[01] ; F . s,t = ((1 - t) * (P . s)) + (t * (Q . s))
thus
F . s,t = ((1 - t) * (P . s)) + (t * (Q . s))
by A8; verum