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