deffunc H_{1}( Tuple of 2,BOOLEAN) -> Element of BOOLEAN = F_{1}(($1 . 1),($1 . 2));

consider f being Function of (2 -tuples_on BOOLEAN),BOOLEAN such that

A1: for a being Tuple of 2,BOOLEAN holds f . a = H_{1}(a)
from FUNCT_2:sch 4();

_{1}(x,y) ) & ( for x, y being Element of BOOLEAN holds f2 . <*x,y*> = F_{1}(x,y) ) implies f1 = f2 )

assume that

A2: for x, y being Element of BOOLEAN holds f1 . <*x,y*> = F_{1}(x,y)
and

A3: for x, y being Element of BOOLEAN holds f2 . <*x,y*> = F_{1}(x,y)
; :: thesis: f1 = f2

consider f being Function of (2 -tuples_on BOOLEAN),BOOLEAN such that

A1: for a being Tuple of 2,BOOLEAN holds f . a = H

hereby :: thesis: for f1, f2 being Function of (2 -tuples_on BOOLEAN),BOOLEAN st ( for x, y being Element of BOOLEAN holds f1 . <*x,y*> = F_{1}(x,y) ) & ( for x, y being Element of BOOLEAN holds f2 . <*x,y*> = F_{1}(x,y) ) holds

f1 = f2

let f1, f2 be Function of (2 -tuples_on BOOLEAN),BOOLEAN; :: thesis: ( ( for x, y being Element of BOOLEAN holds f1 . <*x,y*> = Ff1 = f2

take f = f; :: thesis: for x, y being Element of BOOLEAN holds f . <*x,y*> = F_{1}(x,y)

let x, y be Element of BOOLEAN ; :: thesis: f . <*x,y*> = F_{1}(x,y)

reconsider a = <*x,y*> as Tuple of 2,BOOLEAN by FINSEQ_2:101;

thus f . <*x,y*> = F_{1}((a . 1),(a . 2))
by A1

.= F_{1}(x,(a . 2))
by FINSEQ_1:44

.= F_{1}(x,y)
by FINSEQ_1:44
; :: thesis: verum

end;let x, y be Element of BOOLEAN ; :: thesis: f . <*x,y*> = F

reconsider a = <*x,y*> as Tuple of 2,BOOLEAN by FINSEQ_2:101;

thus f . <*x,y*> = F

.= F

.= F

assume that

A2: for x, y being Element of BOOLEAN holds f1 . <*x,y*> = F

A3: for x, y being Element of BOOLEAN holds f2 . <*x,y*> = F

now :: thesis: for a being Tuple of 2,BOOLEAN holds f1 . a = f2 . a

hence
f1 = f2
by FUNCT_2:63; :: thesis: verumlet a be Tuple of 2,BOOLEAN; :: thesis: f1 . a = f2 . a

consider x, y being Element of BOOLEAN such that

A4: a = <*x,y*> by FINSEQ_2:100;

thus f1 . a = F_{1}(x,y)
by A2, A4

.= f2 . a by A3, A4 ; :: thesis: verum

end;consider x, y being Element of BOOLEAN such that

A4: a = <*x,y*> by FINSEQ_2:100;

thus f1 . a = F

.= f2 . a by A3, A4 ; :: thesis: verum