let A be non trivial set ; :: thesis: for B, Bo1 being set
for yo1 being Function of Bo1,A
for Bo2 being set
for yo2 being Function of Bo2,A st Bo1 c= B & Bo2 c= B & cylinder0 A,B,Bo1,yo1 = cylinder0 A,B,Bo2,yo2 holds
( Bo1 = Bo2 & yo1 = yo2 )
let B, Bo1 be set ; :: thesis: for yo1 being Function of Bo1,A
for Bo2 being set
for yo2 being Function of Bo2,A st Bo1 c= B & Bo2 c= B & cylinder0 A,B,Bo1,yo1 = cylinder0 A,B,Bo2,yo2 holds
( Bo1 = Bo2 & yo1 = yo2 )
let yo1 be Function of Bo1,A; :: thesis: for Bo2 being set
for yo2 being Function of Bo2,A st Bo1 c= B & Bo2 c= B & cylinder0 A,B,Bo1,yo1 = cylinder0 A,B,Bo2,yo2 holds
( Bo1 = Bo2 & yo1 = yo2 )
let Bo2 be set ; :: thesis: for yo2 being Function of Bo2,A st Bo1 c= B & Bo2 c= B & cylinder0 A,B,Bo1,yo1 = cylinder0 A,B,Bo2,yo2 holds
( Bo1 = Bo2 & yo1 = yo2 )
let yo2 be Function of Bo2,A; :: thesis: ( Bo1 c= B & Bo2 c= B & cylinder0 A,B,Bo1,yo1 = cylinder0 A,B,Bo2,yo2 implies ( Bo1 = Bo2 & yo1 = yo2 ) )
assume AS:
( Bo1 c= B & Bo2 c= B & cylinder0 A,B,Bo1,yo1 = cylinder0 A,B,Bo2,yo2 )
; :: thesis: ( Bo1 = Bo2 & yo1 = yo2 )
P1:
{ y where y is Function of B,A : y | Bo1 = yo1 } = cylinder0 A,B,Bo1,yo1
by DefX01, AS;
P2:
{ y where y is Function of B,A : y | Bo2 = yo2 } = cylinder0 A,B,Bo2,yo2
by DefX01, AS;
hence
Bo1 = Bo2
by Lm2, AS, P1; :: thesis: yo1 = yo2
consider y0 being set such that
P4:
y0 in { y where y is Function of B,A : y | Bo1 = yo1 }
by P1, XBOOLE_0:def 1;
consider y being Function of B,A such that
P5:
( y0 = y & y | Bo1 = yo1 )
by P4;
consider w being Function of B,A such that
P6:
( y0 = w & w | Bo2 = yo2 )
by P1, P2, AS, P4;
thus
yo1 = yo2
by Lm2, AS, P1, P2, P5, P6; :: thesis: verum