let C1, C2 be Coherence_Space; :: thesis: for f being U-linear Function of C1,C2
for a being Element of C1 holds f . a = (LinTrace f) .: a
let f be U-linear Function of C1,C2; :: thesis: for a being Element of C1 holds f . a = (LinTrace f) .: a
let a be Element of C1; :: thesis: f . a = (LinTrace f) .: a
set X = LinTrace f;
( ( for a, b being set st {a,b} in C1 holds
for y1, y2 being object st [a,y1] in LinTrace f & [b,y2] in LinTrace f holds
{y1,y2} in C2 ) & ( for a, b being set st {a,b} in C1 holds
for y being object st [a,y] in LinTrace f & [b,y] in LinTrace f holds
a = b ) ) by Th53, Th54;
then consider g being U-linear Function of C1,C2 such that
A1: LinTrace f = LinTrace g and
A2: for a being Element of C1 holds g . a = (LinTrace f) .: a by Lm6;
g . a = (LinTrace f) .: a by A2;
hence f . a = (LinTrace f) .: a by A1, Th55; :: thesis: verum